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Grundlagen: 


So funktioniert Ihr Monitor 


Joyce: 


Preiswerte Datenübertragung 

- Alles über Kermit 

Akten beschriften 

- Fein und säuberlich 


CPC-Programme: 1 

Komfortable 

Zeitschriftenverwaltung 


S : 

feSN 


Beschleunigte Bildschirmausgabe 

- Mauspatch macht’s möglich 

Der private Karteikasten 

- Bringt Ordnung in Ihre Unterlagen 










































































































































































































































































































































Sonderhefte Joyce Nr. 2, 3, 4 
für sagenhafte 29,- DM* 


Kühles Wetter, 
heiße Preise 


DMV braucht Platz für neue Ideen - 
darum müssen wir unsere Lager räumen. 




Allen JOYCE-Besitzern machen wir deshalb ein einmaliges Angebot: 

JOYCE Sonderhefte 2, 3 und 4 sind ab sofort im Kombi-Pack zum Preis von 29,- DM beim Verlag zu beziehen. 
- Sie sparen mehr als 50% gegenüber dem Einzelpreis! 

JOYCE Sonderhefte sind Sonderpublikationen der PC AMSTRAD International und bieten jeweils auf 120 Seiten 
ausschließlich erstmalig veröffentlichte Beiträge, Tips und Tricks zu PCW 8256, 8512 und 9512. 


Aus dem Inhalt 
JOYCE Sonderheft 2: 

Adreßverwaltung 
Archivprogramm 
(Video-oder Literaturverwaltung) 
PASCAL-Compiler in BASIC 
Suburbia (Spiel ähnlich Monopoly (R)) 
Turbo-PASCAL-Grafikroutinen ohne GSX 
Komfortable Balkengrafik 
JOYCE-Zweitlaufwerk selbst anschließen 
3-D-Plotter 

Etikettendruckprogramm 
Ordnung auf der Diskette mit LocoScript 
Funktionstasten selbst belegen 
Spaltensatz unter LocoScript 
dBase-Handbuch selbst ausdrucken 
LOGO- Funktionenzeichner 


Aus dem Inhalt 
JOYCE Sonderheft 3: 

Vokabeltrainer 

RAM-Monitor-Speicherinhalte 
verändern 
Memory-Spiel 
Mini-DTP-Programm 
Drucker-Spooler unter CP/M 
Disketten-Kopierprogramm bis 
43 Spuren 

Reset ohne Datenverlust 
Grafik auf dem JOYCE-Drucker 
Tastaturbelegung unter CP/M und 
LocoScript ändern 
Reset ohne Datenverlust 
Super-Werkzeugkiste dBase 
Grafikutilities für LOGO 



Aus dem Inhalt: 

JOYCE Sonderheft 4: 

Strickmustergenerator 
WordStar-Verbesserungen 
Bundesligasimulator 
Super Reaktionsspiel 
FILEMANAGER, Pulldown-Menüs 
Stichwortverzeichnis, 
Astrologieprogramm 
Diskettenmonitor 
Hauptstädte raten in LOGO 
Statuszeile für dBase und Basic 
Hardcopyroutine für 24-Nadler 
LOGO macht Schachteln 
d Base-Literaturverwaltung 
Universelles Werkzeug zur Veränderung 
von dBase-Dateien 


Und dazu die Databoxen aller Sonderhefte im Paket! 


5 Disketten Joyce-Power für traumhafte 79,— DM* 

* Unabhängig von der Anzahl der bestellten Artikel berechnen wir für das Inland 4,- DM bzw. für das Ausland 6,- DM 
Porto und Verpackung. 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege “»r.. 
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Editorial—i 



Informationsflut 


Informationen über Informationen bekommen wir jeden Tag zu lesen oder zu 
hören. Sei es von der Tageszeitung, vom Fernsehen oder Radio. 

Dies fängt ja bekanntlich schon morgens beim Aufstehen an, wenn wir uns 
vom Radio über das neueste Weltgeschehen mehr oder minder informieren 
lassen. 

Damit haben wir schon in den frühen Morgenstunden dem Gehirn die ersten 
Informationen zugespielt. Die Gedankenströme werden angeregt und 
beginnen zu fließen, die Informationen des gesprochenen oder des gelesenen 
Wortes werden aufgenommen und träge verarbeitet. Nach diesem Schub geht 
es in der Schule oder im Berufsalltag weiter. Dort werden die neuesten 
Erlebnisse oder Ereignisse des letzten oder des neuesten Tages besprochen, 
was bei manchen Leuten zu einem Redeschwall ausarten kann. Neue 
Informationen und Empfindungen strömen auf uns ein und werden 
aufgenommen, aber nicht unbedingt verarbeitet - Auswahlverfahren von 
Wichtig- und Nichtigkeit. 

Ein weiterer Informations- oder Datenfluß ergibt sich im Laufe des Tages, 
der auch nach dem Feierabend nicht aufhört, sei es von der Frau und den 
Kindern oder einfach auch durch Freunde und Bekannte. 

Durch diese wahre Flut von Neuem und Altem ist mancher so übersättigt, 
daß nichts mehr aufgenommen wird und eine Sortierung der Ereignisse 
stattfinden muß, um eine richtige Verarbeitung und eine eventuelle 
Verwertung zu gewährleisten. 

Und nun tritt die Computerzeitung auf den Plan, mit einer gewaltigen 
Informationsfülle über die neuesten Computer, Programme und dem 
Aktuellsten aus der Computerszene, und das Monat fiir Monat. 

Doch ofimals wird von den produzierenden Redakteuren vergessen, daß zu 
viele Informationen über ein Thema zu einem Gedankenblock und Stau 
führen können, was wiederum zu einer Ablehnung des Themas werden kann. 
Wir betrachten es als unsere Aufgabe, unsere Beiträge so verständlich wie 
möglich darzubieten, so daß sie auch von streßgeplagten Menschen gern an- 
und aufgenommen werden. Das bedeutet, viel “Kleinkram “ in kompakte, 
wissenswerte Informationen umzuwandeln, ohne die Informationsverarbeitung 
zu überfordern. Und nun wünschen wir Ihnen viel Ruhe beim Lesen und 
Informieren. 

In diesem Sinne 


Claus Daschner 



v CUci: {~})a£c 
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IN HALT 


BERICHTE: 


Vom Bit zum Lichtpunkt 

Auf den Monitor blicken wir Tag für Tag, Ein¬ 
blick in selbigen verschafft Ihnen unser Be¬ 
richt. 

AMS-Line 

- Neuigkeiten direkt von AMSTRAD 

SERIE: 


8 


18 


Fragen zu Monito¬ 
ren? Nach der Lek¬ 
türe unseres Berich¬ 
tes nicht mehr! 

S.8 



52 dBase verständlich (2. Teil) 

- Hilfe bei der Installation von Programm¬ 
teilen 


PROGRAMME: 


Zeitschriftenverwaltung 

- Mit diesem Programm gehört das Suchen 
nach bestimmten Artikeln der Vergangen¬ 
heit an. 

40 

Boing 

- Spannende Break-Out-Variante 

45 

Kalender einmal anders 

- Berechnung der unmöglichsten Jubiläen 

48 

ASSEMBLER: 


56 Die Assembler-Ecke 

- Illegale Z-80-Opcodes 


TIPS & TRICKS: 

Halb so groß bringt doppelt Platz 

- Neue Möglichkeiten der Schriftausgabe un¬ 
ter BASIC 

20 

Bigbox 

- Grafik-Tricks durch RSX 

21 

Gewußt wo 

- Erweiterung der Videoverwaltung aus Heft 

6/89 durch eine Suchfunktion 

22 

Nichts ist unmöglich 

- Die variable GOTO-Sprunganweisung 

24 

Threed 

- 3D-Schriftzüge in verschiedenen Größen 

26 

100,- DM für 1 kByte 

- Ultrakurze Listings, die Enormes leisten 

28 



Damit Sie nicht in der Artikelflut Ihrer Zeitschriften ertrinken, bieten wir 
Ihnen ein komfortables Verwaltungsprogramm 


S.40 


HARDWARE: 


60 Komfortabler Mitläufer 

- Das Teamdrive-Zweitlaufwerk für den CPC 

SOFTWARE REVIEWS: 

Eine neue Bewertung 32 

- Wie unser neues Bewertungssystem zur 
Beurteilung von Software funktioniert 

Spiele 32 

- Rick Dangerous 

- Lizenz zum Töten 

- Gilbert - Escape from Drill 


Im Test: Das Team¬ 
drive-Zweitlaufwerk 


S. 60 
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Im Kino seit über 25 Jahren etabliert. Wie wird Bond, James Bond, auf 
dem CPC abschneiden? 


S.34 


ABENTEUER: 


38 Gamers Message 

- Ein Wegweiser durch die Labyrinthe von 
Bards Tale erwartet Sie ebenso, wie eine 
Karte und nützliche Tips zu Driller. 


PCW/JOYCE: 

Quick LogoPic 62 

- Das direkte Einladen von Logo-Bildern un¬ 
ter CP/M ist jetzt endlich möglich. 


Ordnung muß sein 72 

- Haben Sie sich nicht auch schon über die 
schlechte Beschriftung Ihrer Aktenordner 
geärgert? Das hat nun ein Ende. Fein säu¬ 
berlich können Sie mit unserem Programm 
AKTE Etiketten für Ihre Ordner ausdrucken. 


Kermit, das vielseiti¬ 
ge und weitverbrei¬ 
tete Programm er¬ 
öffnet Ihnen neue 
Möglichkeiten mit 
Ihrem JOYCE PCW 

S. 74 



Training für Ihre grauen Zellen steht mit dem Denkspiel Verflixt ins Haus 

S. 90 


Kermit 74 

- Alle wichtigen Funktionen, sowie viele Tips 
& Tricks zum Umgang mit KERMIT werden 
Ihnen durch diesen Artikel nähergebracht. 


PC: 


82 Unterlagen-Datei 

- Wächst Ihnen der persönliche Papierberg 
zu schnell an? Die Unterlagen-Datei bringt 
Ordnung in Policen und Bescheide. 


90 Verflixt (und zugenäht) 

- Schiebefix mal anders. Konzentration ist 
bei diesem Spiel angesagt. 

93 Eine Maus macht Ärger 

- Ein Patch, der der Maus Beine macht und 
die Bildschirmausgabe beschleunigt 


96 Finesse - DTP für jeden 

- Warum nicht mal eine eigene Zeitung ma¬ 
chen? Mit Finesse ist das kein großes Pro¬ 
blem. 


RUBRIKEN: 


3 

3 

6 

14 

100 

101 

102 

102 
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I—Aktuell 


Die Silicon Valley Story 


Neuigkeiten von AMSTRAD 



Die Geschichte des Mekkas der 
Chip-Entwickler wird nun in ei¬ 
nem Multi-Media-Paket detail¬ 
liert dokumentiert. Zu diesem 
Paket gehören ein Buch, eine 
Videokassette und eine Single. 
Das Buch schildert auf über 500 
Seiten alles Wissenswerte über 
das “Tal des Silikons", obwohl 
in keinem Absatz auf Brigitte 
Nielsen eingegangen wird. Ko¬ 
stenpunkt des Werkes liegt bei 
49,- DM. Für 129,- DM kann 
zum Buch ein lOOminütiger Vi¬ 


deofilm erworben werden. Der 
darauf befindliche Dokumentar¬ 
film enthält neben informativen 
Interviews herrliche Luftauf¬ 
nahmen von Silicon Valley. 
Damit das Paket auch den Ohren 
bekömmlich wird, ist schließ¬ 
lich noch der “Silicon-Val- 
ley-Song“ auf Schallplatte er¬ 
hältlich; eine runde Sache. 

Info: 

Artigas Verlag 
Sonnenbühl Straße 56 
7750 Konstanz 



Der 9-Nadel-Drucker Citizen 
120D wurde mit einer völlig ver¬ 
änderten Zugtraktor-Einheit mit 
nur einer Papierführung verse¬ 
hen. Die dadurch verbesserte 
Druckqualität soll den im Gra¬ 
fikmodus stellenweise auftreten¬ 
den weißen Querstreifen den 
Garaus machen. 

Durch Verlängerung der Druck¬ 
walze kann nun europaweit jedes 


Standard-Papier-Format einge¬ 
spannt werden. 

Der veränderte Citizen 120D ist 
für 598,- DM erhältlich. 

Info: 

Henschel -t- Stinnes 
Agentur für Öffentlichkeitsar¬ 
beit GmbH 
Ismaninger Straße 52 
8000 München 80 
Tel.: 089-474010 


Der Platz reicht nicht mehr aus. 
Die Firma Amstrad benötigt 
neue Büro- und Lagerräume. 
Aus diesem Grund hat sie ihren 
Sitz nach Mörfelden-Walldorf 
verlegt. Ab dem 21. August 
1989 lautet die neue Adresse: 
AMSTRAD GmbH 
Dreieichstraße 8 


6082 Mörfelden-Walldorf 
Tel.: 06105/2003-0 

Des weiteren wurde die Zusam¬ 
menarbeit mit der Anders Ser¬ 
vice Group aufgekündigt. Nach 
Aussage der Firma Anders wer¬ 
den jedoch bereits begonnene 
Aufträge noch abgewickelt. 


Minidos-Toolbox für Joyce 


Der Soft- und Hardwareversand 
Ulrike Becker bietet jetzt für 
alle Joyce-PCW-Benutzer mit ei¬ 
nem 3 1/2- oder 5 1/4-Zoll- 
Zweitlaufwerk eine Minidos- 
Toolbox an, welche mehrere 
nützliche Utilities zum Daten¬ 
transfer CP/M— >MS-DOS zur 
Verfügung stellt. Enthalten sind 


Programme zum Lesen, Schrei¬ 
ben und zum Formatieren von 
MS-DOS-Disketten mit dem 
Joyce PCW. 

Info: 

Soft- und Hardwareversand 
Ulrike Becker 
Fasanenweg 2 

6690 St. Wendel 8-Niederkirchen 


“Mein PC kann mich verstehen...“ 



Oft wünscht man sich, der 
Computer würde auf gesproche¬ 
ne Befehle des Benutzers hören, 
wenn auch so mancher Fluch, 
falls mal wieder etwas nicht 
klappt, über die Lippen der 
Computerbesitzer kommt. 

Der Voice-Controller läßt nun 
den Computer die Stimme sei¬ 
nes Herren erkennen. Das Sy¬ 
stem analysiert verbale Befehle 
und ruft so Makros auf, die aus¬ 
geführt werden. Der Voice-Con¬ 
troller ist sprecherabhängig. Be¬ 
fehle müssen mehrmals “trai¬ 
niert" werden, damit das Sy¬ 
stem einen hohen Wiedererken¬ 
nungsgrad erhält. Es werden 


Extra-Features wie Oszilloskop- 
Programm oder Echo-Ausgabe 
der Sprache geboten. 

Das Paket enthält eine Steckkar¬ 
te mit zwei Eingängen, einem 
Ausgang und Lautstärkeregler, 
Kopfhörer/Mikrofon-Kombina¬ 
tion, Software und deutsches 
Handbuch. 

Unterstützt werden alle Rech¬ 
ner, die mindestens MS-DOS 
2.1 benutzen. 

Info: 

Friedrich Meier 
Personal Computer Support 
Alt-Holzhauser-Straße 25 
4902 Bad Salzuflen 1 
Tel.: 05222/22276 


L 
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Aktuell—| 



Die Firma Sybex hat ihre Pro¬ 
duktpalette um zwei weitere 
Programme erweitert. 

Neben dem Programm StarCalc 
3D, einer professionellen Tabel¬ 
lenkalkulation, welche 16.000 
Spalten sowie 16.000 Reihen 
verarbeiten kann und über 91 
Funktionen zum Rechnen, Ver¬ 
schieben und Kopieren zur Ver¬ 
fügung stellt, erschien das Pro¬ 
gramm StarChart 3D, welches 
Für die Anwendung der profes¬ 
sionellen Businessgrafik im 2D- 
und 3D-Modus zur Verfügung 
stellt. Dieses Programm unter¬ 
stützt alle gängigen Grafikkar¬ 
ten wie Hercules, CGA, EGA 
und VGA. 


Zu den Programmen LOTUS 
1-2-3 sowie zu DIF-, SYLK- und 
ASCIl-Dateien ist eine Schnitt¬ 
stelle gegeben, was für das Ar¬ 
beiten mit mehreren Program¬ 
men spricht. 

Des weiteren sind Standard- 
Operationen wie Kopieren, Lö¬ 
schen, Verschieben und das Ein¬ 
fügen oder Vertauschen von Rei¬ 
hen und Spalten integriert. 

Die benötigte Mindestkonfigu¬ 
ration muß aus DOS ab Version 
2.0, einem PC/XT/AT mit Fest¬ 
platte und mindestens 512 kByte 
RAM bestehen. 

Info: SYBEX-Verlag GmbH 
Postfach 30 09 61 
4000 Düsseldorf 30 


Das Jahr geht zu Ende, und die 
Erfindung des wiederverwend¬ 
baren Kalenders läßt immer 
noch auf sich warten. Was tun? 
Freunde von Computergrafiken 
sollten die beiden Kalender 
“Brigitte Porsch: Computer gra- 
phic“ und “Künstliche Kunst - 
Computer art“ in ihre Wahl mit 
einbeziehen. 

“Künstliche Kunst - Computer 
art“ zeigt Grafiken, die teils sur¬ 
realistischen, teils real-verfrem- 
deten Charakters sind. Kompo¬ 
sitionen mit vermischten Moti¬ 
ven stehen neben experimentell 
erstellten Grafiken. Der Kalen¬ 
der überzeugt durch die Ab¬ 


wechslung, die er dem Betrach¬ 
ter bietet. Preis: 46,- DM. 

“Brigitte Porsch: Computer gra- 
phic“ bietet dagegen Bilder, die 
wesentlich abstrakter und ge¬ 
wöhnungsbedürftigersind. Farb- 
spielerei steht hier im Vorder¬ 
grund, Motive lassen sich allen¬ 
falls schemenhaft erahnen. Der 
Kalender ist für 46,— DM er¬ 
hältlich. 

Info: 

expert 

Public Relations GmbH 
Gutleutstraße 100 
6000 Frankfurt/Main 
Tel.: 069/230404 o. 230405 


Deutsche Version von TCIP0WER 


Neue Windows-Version 


TCIPOWER, ein Programm, 
mit dem Expanded Memory si¬ 
muliert werden kann, ist nun 
auch komplett in Deutsch er¬ 
hältlich. 

Das Programm, das Extended 
Memory in nutzbaren Expanded 
Memory umwandeln kann oder 
letzteren einfach auf der Hard¬ 
disk zu simulieren instande ist, 
läuft unter allen MS-DOS-Ver- 
sionenvon2.1 bis 4.01. Es arbei¬ 


tet mit fast allen Anwenderpro¬ 
grammen zusammen, die auf 
den erweiterten Speicher zu¬ 
greifen. 

Die deutsche Version von 
TCIPOWER kostet 275,- DM. 

Info: 

Kienitz + Grabis Soft- und 
Hardware-Versand + Verlag 
Schulstraße 18 
8913 Schondorf 


Neue Versionen von Win¬ 
dows/286 und Windows/386 
sind von Microsoft erschienen. 
Die Version 2.11 der verbreite¬ 
ten Benutzeroberfläche wartet 
vor allem mit einer von Grund 
auf überarbeiteten Speicherver¬ 
waltung auf. 

So wurde der EMS-Speicher 
(Expanded Memory Specifica- 
tion), der mittels Bank Swit¬ 
ching den Zugriff auf mehr als 
640 kByte unter MS-DOS er¬ 


möglicht, reorganisiert. Win¬ 
dows/386 erhielt einen 8514- 
Treiber für die hochauflösenden 
IBM-PS/2-Bildschirme. 

Des weiteren wurde das Druck¬ 
verhalten verbessert und ver¬ 
schiedene Druckertreiber über¬ 
arbeitet. 

Info: 

Microsoft Pressestelle 
Edisonstraße 1 
8044 Unterschleißheim 


Computerschrott 


Gutes Abschneiden des AMSTRAD PC 1640 


Die Arbeitslosen-Selbsthilfe Al¬ 
tona e.V. hat sich außer Hilfe für 
alte und behinderte Menschen, 
Spielplatzsäuberung und Alt¬ 
bausanierung zur Aufgabe ge¬ 
macht, Computerschrott zu 
“entsorgen“. 

Der Verein, der von Stadt und 
Arbeitsamt Hamburg unter¬ 
stützt wird, holt alte EDV-, 


Telefon- und sonstige Anlagen 
kostenlos ab. Wer also im Keller 
oder auf dem Speicher Compu¬ 
terschrott hortet, der kann sich 
wenden an: 

Arbeitslosen-Selbsthilfe 
Altona e.V. 

2000 Hamburg 50 
Tel.: 040/437001 


Bei der jüngsten alljährlich statt¬ 
findenden Wahl zum Computer 
des Jahres, die auf Initiative des 
Fachmagazins CHIP veranstal¬ 
tet wird, krönte eine internatio¬ 
nale Fachjury den AMSTRAD 
PC 1640 mit der “Silbermedail¬ 
le“. Neu ist auch, daß die Ver¬ 


sion des PC 1640, die bislang 
mit einer 20-MByte-Festplatte 
geliefert wurde, umgerüstet 
wird. Die Platte wird durch eine 
30-MByte-Festplatte ausge¬ 
tauscht. Der Preis ändert sich 
dadurch nicht; mehr Speicher für 
gleiches Geld: eine gute Sache. 
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I—Bericht 


Vom Bit zum Lichtpunkt 

Eine ’Bilder’-Geschichte zum Thema Monitore 

Wenn man bei Computerbesitzern eine Umfrage macht, welches Peripherie¬ 
teil eigentlich das Wichtigste innerhalb einer Computeranlage ist, lauten die 
Antworten meist Floppy (“Irgendwo muß ich ja meine Programme abspei¬ 
chern!“), Drucker (“Meine Daten will ich schwarz auf weiß haben!“) oder, 
vor allem beim PC, Festplatte (“Mit 360 kByte lockt man doch keinen Hund 
hinter dem Ofen hervor!“). Seltsamerweise wird jedoch das eigentliche 
’Hauptgerät’ meistens gar nicht erw ähnt - der Monitor. Oder haben Sie 
schon einmal mit einer Textverarbeitung am Computer gearbeitet, ohne 
überhaupt zu sehen, was Sie schreiben? 


Der Monitor ist eigentlich ein seltsa¬ 
mes Gerät: Er sieht manchmal aus wie 
ein Fernseher aus früheren Zeiten 
(heutzutage sehen die Fernseher aller¬ 
dings eher aus wie Monitore), hat ein 
paar Stellknöpfe und ist ansonsten zu 
nichts anderem zu gebrauchen, als am 
Computer seinen Dienst zu tun. Damit 
hat sich seine Unscheinbarkeit schon 
erklärt: Er ist so wichtig, daß er selbst¬ 
verständlich und damit auch kaum be¬ 
achtet ist. Dabei ist gerade hier ein be¬ 
achtliches Stück Technik notwendig, 
um die Daten, die in einem Computer¬ 
speicher sind, leserlich auf eine Matt¬ 
scheibe zu bringen, ohne daß der da¬ 
vorsitzende Anwender eine solche be¬ 
kommt. 

Zeilen für Zeile 

Das Hauptteil eines Monitors ist die 
Elektronenkanone. Bevor Sie jetzt 
skeptisch auf Ihr Gerät schauen, sehen 
Sie sich lieber doch einmal die Abbil¬ 
dung 1 an: 


Eine Bildröhre besteht in der Regel aus 
einem fast luftleeren Glaskolben, der 
am einen Ende die Sichtfläche hat und 
sich zum anderen Ende hin verjüngt. 
Dort sitzt auch die 'Kanone', eigentlich 
eine Metallplatte, die Elektronen nach 
vorne aussendet. Eigentlich handelt es 
sich um einen richtigen Stromkreislauf 
innerhalb dieser Röhre, denn außer 
dem Elektronensender (Kathode) gibt 
es auch einen Empfänger (Anode), 
denn wie man noch aus dem Physikun¬ 
terricht weiß, muß ein Stromkreislauf 
geschlossen sein, um zu funktionieren. 
Nur, gibt dies noch lange kein Bild, 
oder doch? 

Elektronen, die ausgesendet werden, 
haben eine enorme Geschwindigkeit, 
nämlich fast Lichtgeschwindigkeit 
('fast' deswegen, weil Albert Einstein 
sonst seine Relativitätstheorie über den 
Haufen werfen müßte, aber das ist ein 
anderes Kapitel). Diese hohe Ge¬ 
schwindigkeit erklärt sich durch das 
Bestreben der Elektronen, sich dem 
unnatürlichen Zustand des Getrennt¬ 
seins von ihren Atomen zu entledigen, 


deshalb strömen sie dem Gegenpol 
(Anode) entgegen. Aber - wie im rich¬ 
tigen Leben - wer zu schnell fährt, 
schießt meistens über das Ziel hinaus. 
So auch die meisten Elektronen, sie 
knallen stattdessen mit hoher Energie 
an die Sichtscheibe der Röhre, denn sie 
haben übersehen, daß ihr Ziel nicht auf 
geradem Weg liegt, sondern hinter ei¬ 
ner Kurve. Der Mensch wäre aller¬ 
dings nicht Mensch, wenn er aus dem 
Unglück der Elektronen nicht noch 
Nutzen ziehen würde. So hat man einen 
Stoff auf die Sichtscheibe aufgetragen, 
der bei Elektronenbeschuß Licht frei¬ 
gibt, nämlich Phosphor. Jedes Elek¬ 
tron, daß jetzt gegen die Scheibe 'don¬ 
nert', erzeugt im Phosphormantel ei¬ 
nen Lichtblitz, den man gut wahrneh¬ 
men kann. Leider sind diese Lichlblitze 
ziemlich weit verstreut, man braucht 
also etwas, um die Elektronen so zu 
konzentrieren, daß sich ein Strahl er¬ 
gibt. Wenn man jetzt weitere Metall¬ 
platten in die Röhre legt, und auf diese 
Platten unterschiedliche positive Span¬ 
nungen legt, dann kann man nicht nur 
aus den Elektronen einen Strahl ma¬ 
chen, sondern diesen Strahl auch in 
jede gewünschte Richtung lenken. 
Soweit, so gut. Nur haben wir immer 
noch kein Bild auf dem Schirm. Dazu 
benötigen wir nämlich noch eine Ma¬ 
trize, auf der wir Bilder und Zeichen 
darstellen können, sowie ein Verfah¬ 
ren, das uns garantiert, daß das gesam¬ 
te Bild dargestellt wird. Zum ersten 
Problem erfand man eine Maske, durch 
die nur die Elektronen schlüpfen kön¬ 
nen, die zum Aufbau eines Bildes nötig 
sind: Die Lochmaske. Einige Geräte 
verfügen auch über eine Schlitzmaske, 
die Unterschiede zeigen sich bei der 
Bilddarstellung. 



Abb.I: Wiederum besser im Gegensatz zum Hercules-Monitor ist der LGA- 
Monitor mit seiner Karte. 16 Farben bei hoher Auflösung sind Standard 



Abb.I: Das Nonplusultra ist zur Zeit VGA. 262144 f ärben, wovon bis zu 
256 gleichzeitig darstellbar sind, dazu eine Auflösung von bis zu 1024 * 
1024 Punkten bei Grafikrechnern, das wär doch schon was 
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Um nun ein Bild auf den Monitor zu 
bringen, mußte man den Elektronen¬ 
strahl so lenken, daß der Bildschirm als 
Ganzes genutzt werden konnte und her¬ 
aus kam das Zeilensprung-Verfahren. 
Bei diesem Verfahren lenkt man den 
Elektronenstrahl in die linke obere 
Ecke der Bildröhre, danach wird er 
über die Maske zum rechten Rand ge¬ 
lenkt. Dort angekommen, wird er aus¬ 
geschaltet (der Fachmann redet hier 
von der ’ Austastlücke’) und diagonal 
zur linken Ecke der nächsten Zeile ge¬ 
lenkt und wieder eingeschaltet. Von 
dort gehts wieder zur rechten Seite, 
dann Austastlücke, links, Strahl an, 
nach rechts... 

Wenn das Bild aufgebaut ist, der Strahl 
sich also in der rechten Ecke der letzten 
Zeile befindet, wird er wieder ausge¬ 
schaltet und zur linken Ecke der ersten 
Zeile befördert, dort beginnt das glei¬ 
che Spiel von vorne. Wenn man das so 
liest, könnte einem glatt der Gedanke 
kommen, wie lang das eigentlich dau¬ 
ert. Doch weit gefehlt, denken Sie nur 
einmal an den Fernseher, die Bilder, 
die sie dort sehen, laufen ganz real ab, 
da pro Sekunde 24 Einzelbilder gezeigt 
werden, eine ganze Menge also. Und 
da unsere Gehirne von Natur aus etwas 
träge sind (Nana!!), können Sie keine 
Unterschiede und keinen Bilderwech¬ 
sel zwischen den einzelnen Bildern 
wahrnehmen. Beim Monitor sieht’s et¬ 
was schlechter aus, der CTM 640/644 
des CPC ist ein arger Kopfschmerzer¬ 
zeuger, hervorgerufen durch die Zei¬ 
lenaufbaufrequenz, die der Netzfre¬ 
quenz entspricht. Manche Firmen wer¬ 
ben für ihre Monitore, in dem sie ihnen 
eine höhere Aufbaufrequenz mit auf 
den Weg geben (75 Hertz ist das 
Schlag wort), denn kurz gesagt, je hö¬ 
her die Frequenz, desto ruhiger die 


Bildfolge und desto weniger rote Au¬ 
gen. Doch zurück zum Aulbau des Mo¬ 
nitors. 

Unser ’Selbstbaumonitor im Geiste’ 
hat zwar schon die Grundgestalt er¬ 
reicht, leider fehlt ihm immer noch ei¬ 
niges zum richtigen Sichtgerät. Unter 
anderem haben wir immer noch keine 
Ahnung, wie unser Programm namens 
“HALLO WELT. BAS“ auf dem Moni¬ 
tor zu Ergebnissen kommt, und, was 
noch viel wichtiger ist, warum der 
CPC und so mancher PC auch noch so 
viele Farben auf diesem zeigen. 

Das mit den Farben ist eigentlich eine 
einfache Sache (zumindest für die, die 
es verstehen): Phosphor kann durch 
Mischen mit anderen Stoffen beim 
Aufprall von Elektronen unterschiedli¬ 
che Farben erzeugen. Und diesen Ef¬ 
fekt macht man sich zunutze, in dem 
man für die drei Grundfarben rot, grün 
und blau je eine Elektronen’kanone’ 
nimmt und die Loch- oder Schlitzmas¬ 
ken so anordnet, daß der dazugehörige 
Strahl genau auf das auf gleichfarbig 
getrimmte Phosphor-Material trifft. 


Der an dieser Stelle auftretende Licht¬ 
blitz nimmt dann die Farbe an, die er 
erzeugen soll. 

Im großen und ganzen sind damit die 
Funktionseinheiten eines Monitors 
vorhanden, kommen wir daher jetzt 
zum Thema ’Daten sichtbar machen’. 

Vom Byte zum Strahl 

Wenden wir uns also jener Faszination 
zu, die uns fast den ganzen lieben lan¬ 
gen Tag umgibt, die wir aber kaum 
noch wahmehmen, weil sie schon zu 
einer Selbstverständlichkeit geworden 
ist: Die Faszination der scheinbar aus 
dem Nichts entstehenden Bilder und 
Töne, wie wir sie beispielsweise bei 
Schallplatten, Video- oder Audiokas- 
setten beobachten können. Denn, ist es 
etwa kein Grund zum Staunen, wenn 
ein Diamant auf einer schwarzen 
Scheibe herumfahrt und dadurch liebli¬ 
che Melodien erzeugt? Das gleiche 
Staunen können wir erleben, wenn wir 
uns begreiflich zu machen versuchen, 
daß ein paar elektrische Zustände als 
Informationen gebraucht werden und 
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mit ein paar Tricks bunte Bilder er¬ 
zeugen. 

Um diese Informationen, die im Com¬ 
puter zur Anzeige bereitstehen, zum 
Bildschirm zu bringen, braucht es noch 
einiges an Umwegen, die wir 'Normal¬ 
gucker' auf den ersten Blick gar nicht 
wahrnehmen. Das, was zur Monitor¬ 
ausgabe bereitsteht, wird in einem spe¬ 
ziellen Teil des Speichers festgehalten 
- dem Video-RAM. Während dieser 
Bereich des Schreib-/ Lesespeichers 
bei den kleinen Geräten Joyce und CPC 
ein fester Bestandteil des gesamten 
RAMs ist, stellt er beim PC einen Teil 
der erforderlichen Video-Karte dar. In 
diesem Video-RAM befindet sich quasi 
ein Abbild dessen, was später auf dem 
Monitor erscheint. Zuerst jedoch wer¬ 
den die einzelnen Zeichen, die in die¬ 
sem Speicher stehen, auf Ihre Bitmu¬ 
ster abgetastet. Diese Aufgabe über¬ 
nimmt ein Zeichengenerator, indem er 
Zeichen für Zeichen dem RAM ent¬ 
nimmt, es mit einer Tabelle vergleicht 
und das Ergebnis, das Bitmuster, wei¬ 
terliefert. Auch weitere Informationen 
über die Darstellung der Zeichen, also 
zum Beispiel Farbe, inverse Darstel¬ 
lung oder Musterung, werden hier ent¬ 
nommen und zur weiteren Bearbeitung 
umgewandelt. Die solcherart umge¬ 
wandelten Zeichen, oder bleiben wir 
lieber bei Bitmuster, werden noch ein¬ 
mal umgewandelt, und zwar in vom 
Monitor verwertbare Signale. Diese 
Signale wiederum steuern im Monitor 
die von vorhin bekannten Elektro- 
nen'kanonen’. Das Ganze ist jetzt sehr 
stark vereinfacht worden, damit Sie 
eine ungefähre Vorstellung von dem 
bekommen, was zwischen Programm 
und sichtbaren Daten vor sich geht, der 
eigentliche Signal verlauf ist jedoch viel 
komplizierter, als gerade beschrieben. 

Zum Beispiel wird der Zeilenaufbau 
des Monitors nicht von ihm selbst, son¬ 
dern vom jeweiligen Video-Control- 
ler-Baustein gesteuert, dem CRTC. Er 
ist der 'Aufpasser’ über alles, was im 
Video-RAM passiert, gleichzeitig aber 
auch 'Steuermann’ für den Monitor. 
Der gebündelte Elektronenstrahl des 
Monitors wird von ihm aus- und einge¬ 
schaltet, zum Beispiel bei der Austast¬ 
lücke oder beim Strahlrücklauf. 

Schon jetzt wird klar, daß es beim An¬ 
passen systemfremder Monitore nicht 
auf diese selbst ankommt, sondern dar¬ 
auf, ob der jeweilige Video-Controller 


in der Lage ist, die entsprechenden Si¬ 
gnale zu liefern. 

Pixeleien 

Ein ganz wichtiger Punkt ist die Auflö¬ 
sung eines Monitors. Damit ist ge¬ 
meint, wieviele Löcher in der Loch¬ 
maske vorhanden sind, um den Elek¬ 
tronenstrahl durchzulassen. Anstatt 
von Lochpunkten spricht man von PI- 
XELN, einem Kunstwort, das sich aus 
dem englischen Begriff 'PIcture ELe- 
ment’ zusammen setzt, wobei das ’ctu- 
re’ aus unerfindlichen Gründen zu ei¬ 
nem X wurde. Wenn ein Monitor eine 
Menge solcher Pixel in vertikaler und 
horizontaler Richtung besitzt, so ist das 
zwar schön, es bedeutet aber auch, daß 
dementsprechend viel Video-RAM zur 
Verfügung stehen muß. Am besten 
schauen wir uns einmal die unter¬ 
schiedlichen Pixelgrößen anhand der 
PC-Grafikkarten an (die Monochrom- 
Karte wollen wir hier einmal außer 
acht lassen, da sie nur für Textdarstel¬ 
lungen zu gebrauchen war und keine 
Einzelpunktdarstellung zuließ): 

Die CG/l-Karte (Color Graphics Adap¬ 
ter) kann in zwei Modi betrieben wer¬ 
den, einmal mit 320 * 200 Pixel (Bild¬ 
punkten) und einer gleichzeitigen Dar¬ 
stellung von vier Farben, oder mit der 
doppelten horizontalen Auflösung von 
640 * 200 Pixel und zwei gleichzeitig 
darstellbaren Farben. Bei Modus 1 sind 
einige recht ansehnliche Grafiken mög¬ 
lich, durch die wenigen Farben gibt es 
allerdings Erkennungsschwierigkeiten 
bei Details. Die CGA-Karte des AM- 
STR AD PC 1512 ist dazu in der Lage, 
in beiden Modi 16 Farben zu erzeugen, 
nur wird dies leider nur von wenigen 
Programmen beachtet. Die Textdar- 
stellung unter CGA läßt etwas zu wün¬ 
schen übrig, ein dauerhaftes Arbeiten 
hinterläßt auf den Augen Spuren. 
Trotzdem ist sie eine der weitverbrei¬ 
tetsten Grafikkarten —eben durch den 
Umstand, daß sie Grafik darstellen 
kann. 

Die Hercules -Karte steht als nächstes 
auf dem Programm. Sie wurde ent¬ 
wickelt, um dem Textdarstellungspro¬ 
blem bei CGA etwas besseres entge¬ 
genzusetzen. Sie wurde vor allem ge¬ 
gen die Text-Monochrom-Karte einge¬ 
setzt, da sie erstens eine gute Textdar¬ 
stellung durch hohe Auflösung (80 
Spalten/25 Zeilen) hat, die deshalb bes¬ 
ser als bei CGA ist, und zweitens Gra¬ 
fik mit 720 * 348 Pixel darstellen kann. 


Einzig die Farben’vielfalt’ ist etwas ge¬ 
mindert, Hercules verfügt als Mono- 
chrom-Karte nur über zwei Farben. 

Den Unterschied zwischen CGA- und 
Hercules-Darstellung auf den jeweili¬ 
gen Monitoren können Sie in Abbil¬ 
dung 5 sehen. 

Kommen wir jetzt zum ’AdeF unter 
den Grafikkarten. Da wäre zuerst die 
EG/l-Karte mit ihrer sehr guten Auflö¬ 
sung von bis zu 640 * 350 Pixeln mit 16 
gleichzeitig darstellbaren Farben. Der 
entsprechende Monitor hat eine gute 
Farbwiedergabe, bei der Farbtrennun- 
gen sich gut abgrenzen. Die EGA-Kar- 
te kann dazu auch die CGA-Karte 
'emulieren’, daß heißt, Programme, 
die normalerweise auf einem CGA- 
Monitor zu sehen sind, können genau¬ 
sogut auf einem, mit EGA (was übri¬ 
gens 'Enhanced Graphics Adapter’, 
also auf gut deutsch 'Erweiterte Gra¬ 
fikkarte’ bedeutet) ausgestattetem Mo¬ 
nitor funktionieren. EGA-Karten sind 
heute schon ziemlich preiswert, Kom¬ 
binationen aus Monitor und Karte sind 
teilweise schon ab 1200,— DM zu be¬ 
kommen. 

VGA (Video-Graphics-Adapter) ist im 
Augenblick das Schlagwort der Grafik- 
Enthusiasten. Es ist allerdings schon 
erstaunlich, was diese neue Grafikkar¬ 
te mit ihrem Monitor so an Bildern zau¬ 
bert. Die Daten können sich sehen las¬ 
sen: 640 * 480 Pixel, bis zu 256 Farben 
aus knapp 262.000 bringen ganz schön 
Pep ins PC-Leben. Warum aber hat die 
VGA-Karte einen so großen Abstand 
zur EGA-Karte, währen diese einen re¬ 
lativ kleinen zur CGA hat? 

Des Rätsels Lösung heißt schlicht und 
einfach: Analog! Zum besseren Ver¬ 
ständnis: Bei den bisherigen Grafikkar¬ 
ten wurden die Daten als Bitmuster an 
den Monitor übergeben, der Begriff 
BIT bedeutet aber zwangläufig DIGI¬ 
TAL. Und digitale Informationen sind 
in ihren Abgrenzungen recht ein¬ 
geengt; je mehr Farbinformationen ein 
Monitor benötigt, desto mehr Platz im 
Speicher benötigt der Controller. Bei 
VGA sind die Erfinder einen anderen 
Weg gegangen: Die VGA-Karte liefert 
jetzt analoge Signale an den Monitor 
und damit sind auch viele Zwischen¬ 
werte möglich, die digitale Daten nicht 
zulassen. Daher kommt auch die un¬ 
heimlich große Farbpalette von 
262.000 Farben. Den Unterschied in 
der Darstellung von EGA- und VGA- 
Monitoren sehen Sie in Abbildung 7. 
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Abb.3: CGA- und 
Hercules-Monitor im 
Vergleich, bei Text 
und Grafik kommt 
der Hercules-Monitor 
besser weg, obwohl 
er monochrom ist 
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Noch etwas: Die VGA-Karte kann auf 
dem dazugehörenden Monitor jede an¬ 
dere, tieferstehende Grafikkarte emu¬ 
lieren, also MDA (Monochrom-Kar¬ 
te), CGA, Hercules und EGA. Jetzt 
dürfte allerdings auch klar sein, warum 
der gute alte CGA-Monitor nicht an 
eine der neuen VGA-Wundermaschi- 
nen paßt, die Signale, die zum Monitor 
gehen, entsprechen nicht denen, die 
der Monitor erwartet. Was also tun? 

Bastlers Freud oder Leid? 

Daß ein Anpassen des vorhandenen 
Monitors an ein neues PC-System nicht 
gerade einfach ist, diese Erfahrung ha¬ 
ben schon viele gemacht. Dabei liegt es 
meistens an der Unverträglichkeit zwi¬ 
schen Signalausgang am PC einerseits 
und am Signaleingang andererseits. 
Die meisten Computermonitore, die ir¬ 
gendwo zu Hause stehen, sind fest für 
ein System vorgesehen, daß heißt, an 
einen Monitor, der negative digitale 
Impulse erwartet, werden Sie nur 
schwerlich positive Impulse anlegen 
können. Und ein PC mit analogem 
Ausgang zieht wahrscheinlich beim 


Anschluß an einen digitalen Eingang 
den kürzeren. Es gibt nun mehrere 
Möglichkeiten, eventuellen 'Folge¬ 
schäden' vorzubeugen. Die erste und 
einfachste, aber auch teuerste Möglich¬ 
keit ist die Anschaffung eines soge¬ 
nannten MultiScan-Monitors. 

Diese Geräte haben den Vorteil, über 
mehrere, unterschiedliche Eingänge zu 
verfügen, an denen man jede Art von 
Computer anschließen kann, darunter 


auch solche mit digitalen Ausgängen, 
oder Computer mit Video-Ausgang. 
Durch interne Konvertierungsschal¬ 
tungen und Umschalter läßt sich jeder 
gewünscht Betriebsmodus einstellen. 
Die zweite Lösung ist zwar preiswer¬ 
ter, dafür allerdings auch weniger ge¬ 
eignet: der Selbstumbau. Verschiedene 
Elektronikfirmen bieten eine geraume 
Anzahl an Konvertern an, die die un¬ 
terschiedlichsten Signale umwandeln. 


Eine Bitte 
an unsere 
Abonnenten 


Vermerken Sie bei 
Schriftverkehr und 
Zahlungen neben der 
vollständigen 
Anschrift stets Ihre 
Abo-Nummer. 


Sie vermeiden damit 
unnötige Verzögerun¬ 
gen bei der 
Bearbeitung Ihres 
Abonnements. 


Vielen Dank 

Ihre DMV- 
Versandabteilung 


AMSTRAD - Computer 
Software + Zubehör 


AMSTRAD-Computer auf Anfrage 

JOYCE-Zubehör: 

Farbband 8256/8512 
Papierführung 
3“-Markendisketten 10 St. 

Farbband 9512 
Typenräder 9512 
Typenräder SD15 
Diskettenbox f. 12 Disk. 
Diskettenbox f. 40 Disk. 
Diskettenbox f. 80 Disk. 

PC-Zubehör: 

5 1/4“-Disketten 2D 10 Stück 6,95 
3 1/2“-Disketten 2DD 10 Stück 25,00 


20-MB-Filecard 698,00 

Druckerkabel par. 1,8 m 17,70 

STAR LC10 (deutsch) 465,00 

AMSTRAD LQ3500 780,00 

Druckerständer 29,95 

Farbband LC10 15,95 

Farbband NEC P 2200 16,95 

Abdeckhaube Tastatur 1512/1640 16,95 
Abdeckhaube Monitor 1512/1640 39,50 
Genius Dyna Mouse 135,00 

Laufwerk 3 1/2" 220,00 

Joy-Stick 29,95 

Haftetiketten endlos 100 Stück 8,95 
TextMaker 2.0 248,00 

PC 1512 1 LW/Mono 1.170,00 

PC 1640 2 LW/Mono 1.798,00 

24-N.-Drucker LQ5000 1.150,00 


Weitere Preise aut Antragei 
Preisliste gegen Rückporto. 
Lieferung per Nachnahme oder Voraus¬ 
kasse (Versandkostenpauschale DM 11,40 
pro Paket). 


Kosmalla & Partner 

Datenverarbeitung GmbH 
Bliesstr. 5, 6700 Ludwigshafen 
Tel.: 0621-51 9749 


12.90 
29,50 

59.90 

17.95 
25,00 
25,00 

9,95 

14.95 

18.95 


Neue Speichererweiterung für CPC 

• RAM-Erweiterung 64, 128, 256 oder 512K (ür alle CPCs 
Alle Versionen nachträglich auf Maximal-Verslon autrüstbar 

• optional 2 EPROM-Sockel mit frei wählbarer ROM-Nummer (1-15) 

• Patchprogramm (ür CP/M 2,2 (63K CP/M). Endlich laufen dBase, Multiplan und Wordstar 

• Patchprogramm für CP/M Plus. CP/M Plus auch für CPC 464/664 
' resetfeste RAM-Disc (maximal 448K) für CP/M 2.2 und CP/M Plus 
' resetfeste RAM-Disc unter BASIC (nur bei EPROM-Version) 

• 100% kompatibel zu dk'tronics RAM-Erweiterung und Slllcon-Disc 

• AnschluB über den Expansionsport (kein Eingrift In den Rechner nötig) 

• geringe Abmessungen (mit Gehäuse: 160 x 83 x 20 mm) durchgeführter Erweiterungsbus 

RAM-Erweiterung mit Software für CP/M 2.2 und CP/M Plus auf 3‘-Diskette 
(wahlweise auch 3.5"- oder 5.25“-Dlskette) 

Preise: ohne RAMs.119,- DM 64 KByte.149,- DM 128 KByte.199,- DM 

256 KByte.269,- DM 512 KByte.419,- 0M 

Aufpreis für zusätzliche EPROM-Sockel und Software Im EPROM 49,- DM 


X-Laufwerk für CPC 464/664/6128 

Das X-Laufwerk Ist ein Systemlaufwerk, das anstelle eines 3"-Zweitlaufwerks am CPC 664/6128 
mit eingebautem oder am CPC 464 mit zusätzlichem 3*-Controller betrieben wird. Das X-DDOS- 
Betriebssystem wird zusammen mit einer EPROM-Karte an den CPC angeschlossen 716 K nutz¬ 
bare Kapazität unter BASIC, CP/M 2.2 und CP/M Plus. 

• Die RAM-Belegung von X-DDOS isl nahezu 100% kompatibel zu AMSDOS. 

• Es kann softwaremäBig zwischen X-DDOS und AMSDOS umgeschaltel werden. 

• Es werden Anpassungsprogramme (ür CP/M 2.2 und CP/M Plus mitgeliefert. 

• Die CP/M Plus Anpassung Ist auch aut einem CPC 464/664 mit 64K RAM-Erw. lauffähig. 

• Die 224-KByte EPROM-Karte hat bei Installiertem X-DDOS noch eine Restkapazität von 
208 KByte. 

■ Damit X-DDOS auch in beliebigen anderen EPROM-Karten lauffähig ist, wurde völlig auf 
einen Kopierschutz verzichtet 

• Als LOW-COST-Lösung beim CPC 464 kann das X-DDOS-EPROM auch einzeln bezogen 
und direkt gegen das AMSDOS-ROM ausgetauscht werden. 


X-DDOS-EPROM, Software & Beschreibung gg,- DM 

224-KByte EPROM-Karte, X-DDOS. Software & Beschreibung 239,- DM 

5.25" oder 3.5" X-Laufwerk, 224-KByte EPROM-Karte. X-DDOS. Sottw. & Beschr. 589,- DM 

5.25” oder 3.5" X-Lau(werk, RAM-Erw, ohne RAMs, X-DDOS, Softw. & Beschr. 589,- DM 


EPROM- Karte 224 KByte für alle CPC 

■ Für die EPROM-Typen 2764, -128, -256 
' ROM-Nummern 0-15 frei wählbar 

• 7 Sockel 

• Bei 27256 zwei ROM-Nummern pro Sockel 
‘ Durchgeführter Expansionsport 

■ Software zum automatischen Erstellen von Programmodulen (BASIC und BIN-Dateien) 


Fertiggerät für CPC 464/664 DM 145,- Fertiggerät für CPC 6128 DM 169, - 

Modul-Software auf 3"-Diskette DM 95,- 

Zubehör für EPROM-Karten 

EPROM 2764 DM 7,50 Protext EPROM DM124.- MaxanvEPROM DM124,- 

EPROM 27128 DM 8,50 Promerge Plus-EPROM DM114- Utopia DM 94,- 

EPROM 27256 DM 11,50 X000S EPROM DM 99,- Alpha-ROM DM 35.- 

EPR0M 27512 DM21,50 Tlme-ROM (batteriegepufferte Echt/eiluhr) + EPROM DM135,- 


DOBBERTin 


Industrie-Elektronik GmbH 
Brahmsstraße 9, 6835 Brühl 
Telefon 06202/71417 
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Abb. 4: So gelangen die Infonnationen vom Video-RAM in den Monitor 


zum Beispiel FBAS (ein Video-Ana- 
log-Farbsignal) zu TTL (digitale Far¬ 
binformationen mit High-Low-Pegel) 
und ähnlichem. Hier gibt es vor allem 
eines zu bedenken: Jedes hochfrequen¬ 
te Signal, und dazu gehören nun mal 
Monitorsignale, verliert bei einer Um¬ 
wandlung an Leistung, das erwartete 
Bild ist also nie das gleiche, welches 
vom Ursprungsgerät ausgesendet wur¬ 
de. Hier dient die alte Regel 'Probieren 
geht über Studieren’, jedoch sollte sich 
ihre Gültigkeit auf im Basteln Erprobte 
begrenzen. Inzwischen gibt es sogar 
TV-Konverter für PCs, die das Moni¬ 
torbild auf das heimatliche ’Glotzo- 
phon’ lenkt und damit eine gute Alter¬ 
native zur sonnabendlichen Langewei¬ 
le-Show bilden. Aber auch hier gilt es 
Abstriche bei der Darstellung zu ma¬ 
chen; zum dauerhaften Textschreiben 
eignet sich diese Alternative kaum, es 
sei denn, Ihr Augenarzt ist ein guter 
Bekannter von Ihnen. 

Die Zukunft 

Herkömmliche Monitore, die mit einer 
Kathodenstrahlröhre (Englisch ’Ca- 
thode Ray Tube’ - daher leitet sich 
auch die Abkürzung des Video-Con¬ 
trollers ab: CRTC — Cathode Ray 
Tube Controller. Dies nur für die, die 
es genauer wissen wollen) ausgestattet 
sind, haben entscheidende Nachteile: 
Durch den, meistens durch die Netzfre¬ 
quenz bedingten relativ langsamen 


Bildaufbau entsteht gerade bei billigen 
Modellen ein Flackern. Außerdem ist 
die Belastung des Organismus immer 
noch eine Streitfrage; die einen mei¬ 
nen, es bestünde keinerlei Gefahr für 
Leib und Seele, während andere die 
Bildschirmarbeit an sich verteufeln. 

Genaueres zu diesem Thema ist eigent¬ 
lich nirgendwo zu erfahren, jedoch 
wenn man sich vor Augen hält, daß 


man es mit hochbeschleunigten Elek¬ 
tronen zu tun hat, die an die Front¬ 
scheibe des Monitors knallen, dann 
weiß man auch (Physikunterricht!), 
daß beim Aufprall Radioaktivität frei¬ 
gesetzt wird (genauer gesagt Röntgen¬ 
strahlen). Zwar sind die heutigen Mo¬ 
nitore ausreichend geschützt, trotzdem 
ist im nahen Umfeld des Monitors im¬ 
mer noch etwas zu messen. Eine weite¬ 
re Gefährdung gibt es für die Augen, 
Staubteilchen werden vom Bildschirm 
in den Raum geschossen, meistens in 
Richtung Augen. 

Viele Brillenträger haben bei der Ar¬ 
beit am Computer deshalb einen gro¬ 
ßen Karton antistatischer, feuchter 
Brillentücher dabei, einziger Schutz 
gegen verstaubte Brillengläser. 

Diese Überlegungen (und noch einige 
mehr) haben die Entwicklung immer 
mehr auf eine neue Darstellungstech¬ 
nik gelenkt, die wir ’Normalbürger’ 
meistens von unserer Armbanduhr her 
kennen: LCD. Der Name steht für Li¬ 
quid Crystal Display (Flüssigkristall- 
Anzeige). Hier kommt eine Technik 
zur Geltung, die sich völlig von dem 
unterscheidet, was wir bis jetzt über 
Monitore wissen. 

Kristalle können verschiedene Zustän¬ 
de annehmen, vornehmlich fest und 
flüssig. Bei einem Flüssigkristall be¬ 
stimmter Art sind die Elementarteil¬ 
chen ungeordnet. Wird an diesen Kri¬ 
stall eine Spannung gelegt, richten sich 
die Elementarteilchen aus. Durch ge¬ 
schicktes Einsetzen einer Reflektion- 



Abb. 5: Die Schlitz- 
und die Lochmaske 
im Vergleich 
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Abb. 6: Die Grundschaltung eines Monitors 


Schicht und Ätzen einer Glasstruktur 
kann man die Elementarteilchen eines 
bestimmten Bereiches sichtbar ma¬ 
chen. 

Diese Kenntnisse hat man sich zunutze 
gemacht und aus Flüssigkristallen An¬ 
zeigedisplays hergestellt. Zuerst nur 
für Digital-Anzeigen, inzwischen für 
Monitore in EGA(! !)-Auflösung mit 16 
(!!) Farben. Der Vorteil ist unüberseh¬ 
bar. Durch eine hohe Ansteuerfre¬ 
quenz entsteht ein völlig ruhigstehen¬ 
des Bild, das auch bei Dauerbetrach¬ 
tung nicht die Sehkraft belastet. Die 
Farbtrennung ist nicht anders als 'su¬ 
per’ zu benennen, scharfe Ränder gren¬ 
zen ohne Übergänge die Farben von¬ 
einander ab. Einzig der Preis ist im Au¬ 
genblick sehr hoch, das Display kostet 


zirka 5000,— DM. In naher Zukunft 
jedoch darf man damit rechnen, daß die 
LCD-Technik die guten alten Monitore 
und Fernseher ablösen wird, zu beste¬ 
chend sind die Daten und Möglich¬ 
keiten. 

Bis dahin jedoch wird noch so mancher 
Computerbesitzer nach durchprogram¬ 
mierter Nacht mit Ringen unter den 
Augen am nächsten Morgen in der 
Schule oder am Arbeitsplatz auftau¬ 
chen müssen, es sei denn, man kauft 
sich gleich den richtigen Monitor. 

Bis zum ersten LCD-Monitor darf ich 
Ihnen deshalb gutes Flimmern vor den 
Augen wünschen und hoffe, daß Ihnen 
unsere kleine Exkursion in die Welt der 
Monitore gefallen hat. 

(jb) 
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Abb. 7: Der Farbmo¬ 
nitor des CPC hat 
keine gute Auflösung, 
was man anhand des 
Bildes erkennen 
kann, der Joyce-Mo¬ 
nitor ist wegen seiner 
Einfarbigkeit besser 
zu lesen 


Software für CPC und Joyce 


Preiswerte Software für Amstrad-CPC und 
Joyce mit deutschen Handbuch - so machen 
diese Super-Programme richtig Spaß! 

WS-TUNER für Wordstar * 

Vergessen Sie alles, was Sie bisher über 
WordStar-Erweiterungen erfahren haben! 
Endlich können Sie Dateien per Cursor¬ 
tasten auswählen, die Tasten frei belegen, 
Textbausteine verwalten, neue WordStar- 
Befehle definieren, Textlöschungen rück¬ 
gängig machen, Steuerzeichen invers an- 
zeigen lassen, zwischendurch andere Text¬ 
dateien ansehen, drucken ohne zwischen¬ 
zuspeichern, stets freie Diskettenkapazi¬ 
tät und Textlänge ermitteln und, und, und ... 

Nur DM 49j80 

(unverbindliche Preisempfehlung) 

Großes Buch der Public Domain-Software 

Alles was Sie über deutsche PD-Software 
wissen müssen, Finden Sie in diesem Buch. 
Zusätzlich die deutschen Dokumentationen 
zu den Disks 1-6, 8 und 10-12. Ideale Fund¬ 
grube für Computerterfans! Mit Rabattcou¬ 
pons für unsere Software! Nur DM 34,80 


Neu: Diskette 18 - MacroPack/Z80 

Assemblerprogrammierung für Einsteiger 
und Profis - Z80-Makroassembler mit nnk- 
fähigem Code, Linker, Debugger und Editor. 


1- JRT-Pascal mit 64K-Strings, Overlays * 

2- Z80-Assembler, Linker, Debugger 

4- Compiler Small-C: Fließkommazahlen * 

5- Forth-83: Multitasking, Assembler ... 

6- Utilities: Diskmonitor, Dateiretter ... 

10- BizBasic - CPC-Basic-Erweiterung 

11- E-Basic - CBasic-kompatibler Compiler 

12- Für Turbo Pascal: INLINER, Grafik 
15- WordStar-Utilities: Fußnoten, Index * 
17- C-Interpreter - interaktiv C lernen * 

19- Telekommunikation mit MEX 

* auf dem CPC-464/664 nur mit Speicher¬ 
erweiterung (64K genügen). 

Der Preis? Nur 30,- Mark pro Diskette! 
(unverbindliche Preisempfehlung) 


Unser Kombi-Angebot: 

Eine beliebige der obigen Disketten 1-19 
und neun 3-Zoll-Disketten von Maxell für 
nur 79 Mark! Oder: WS-TUNER und neun 
3-Zöller von Maxell für nur DM 99,80! 


3-Zoll oder Vortex-Format. Lieferung per 
Nachnahme oder Vorauskasse, Ausland: 
nur Vorauskasse. 

MARTIN KOTULLA 

Grabbestraße 9,8500 Nürnberg 90 
Telefon 09 11/30 33 33 

Weitere Bezugsquellen: 

Firma Simon, 4600 Dortmund 1. Tel. 0231 /511370 
Mükra, 1000 Berlin 42, Tel. 030/7529150 
Firma Becker, 6690 St. Wendel 8, Tel. 06856/504 
Computerstore, 8500 Nürnberg. Tel. 0911/2Ö9028 
Hochholzer, 8062 Markt Indersdorf, Tel. 0Ö136/1625 
Weeske, 7150 Backnang, Tel. 07191/1528 
Fritz Obermeier, 4972 Löhne 1 Tel. 05732/3246 
Gisbert Denz, 4784 Rüthen 2, Telefon 02902/58040 
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An unsere Leser 

Neue Durchwahlnummern 
für die Hotline 

eine Einrichtung für alle Le¬ 
ser, die in irgendeiner Form 
Fragen, Probleme oder Anre¬ 
gungen zu Produkten, Pro¬ 
grammierproblemen oder zu 
unserer Zeitschrift haben. 
Selbstverständlich sind wir 

Für eilige Anfragen können Sie 
jetzt Ihren Redakteur direkt er¬ 
reichen. Jeden Mittwoch von 
17.00 bis 20.00 Uhr stehen Ih¬ 
nen zur Verfügung: 

bemüht, alle Leserfragen zu 
beantworten. Doch haben 
Sie bitte Verständnis, daß wir 
nicht alle eingehenden Briefe 

Claus Daschner (CPC) 

« (0 56 51)80 09 -16 

persönlich beantworten kön¬ 
nen. Oft erreichen uns meh¬ 
rere Briefe zum gleichen 

Ralf Schößler (PCW) 

o (0 56 51) 80 09 -18 

i nema, einer davon wrra 

dann stellvertretend für alle 
in unserer Zeitschrift beant- 

Joachim Freiburg (CPC/PC) 
0(0 56 51)80 09 -17 

wertet. | hre pc-Redaktion 

PS: Die Redaktion behält sich vor, Leserzuschriften in gekürzter 
Form wiederzugeben 


Daten über Joystick-Port? 

Ich bin seit 2 1/2 Jahren re¬ 
gelmäßiger Leser ihrer her¬ 
vorragenden PC Internatio¬ 
nal. Nun habe ich einige Fra¬ 
gen bezüglich des CPC 464 
an Ihre Spezialisten. 

1. Ist es möglich, über den 
Joystick-Port des CPC 464 
etwas auszugeben bezie¬ 
hungsweise die Spannung 
daran über die Software zu 
verändern ? 

2. Wurde in Ihrer Zeitschrift 
ein Programm abgedruckt, 
mit dem es möglich ist, Eti¬ 
ketten (für Adressen) zu be¬ 
drucken ? Briefumschläge 
selbst kann man mit meinem 
Drucker nicht bedrucken. 

3. Ein Tip: In der PC Inter¬ 
national 8/89 in der Rubrik 
’Serie — Im Zauberreich der 
Grafik' wurde geschrieben, 
daß der simulierte Mode- 
Wechsel von 2 nach 1 oder 
von 1 nach 0 auf dem CPC 
464 nicht so 'schön ’ sei, wie 
auf einem CPC 664 oder 
6128. 

Hier ist eine Möglichkeit, 
den Mode- Wechsel auf dem 
CPC 464 ebenso 'schön ’ 
durchzuführen, wie auf ei¬ 
nem CPC 664/6128. 

10 'Mode-Wechsel' 

20 Mode 1: ’beziehungs- 
weise2 

30 POKE &B1C8.0: 'bezie¬ 
hungsweise 1 
40 CHAR = 192 
50 FOR ADR=&B1CF TO 
&B1D2 


60 POKE ADR,CHAR 
70 CHAR = CHAR/4 
80 NEXT 

Um die Breitschrift abzu¬ 
schalten, poken Sie in die 
Adresse &B1C8 den echten 
Mode und teilen ’CHAR’ in 
Zeile 70 nicht durch 4, son¬ 
dern durch 2. Außerdem än¬ 
dern Sie bitte Zeile 40 in 
'CHAR = 128' um. 

Kritik: Ihr Outfit war bis zum 
Mai 1989 besser und über¬ 
sichtlicher!! 

Heiko Baumgärtel 
Springe 

Zu Ihrer ersten Frage: Hier 
müssen wir Sie leider ent¬ 
täuschen. Der Joystick-Port 
kann zwar für Abfragen be¬ 
nutzt werden, ist aber nicht 
geeignet, Ausgaben zu 
senden. 

Ein Programm, welches in 
der Lage ist, Etiketten zu 
drucken, wurde in der Aus¬ 
gabe 3/88 veröffentlicht. So¬ 
wohl das Heft als auch die 
Databox können noch nach¬ 
bestellt werden. 

Red. 

Textausgabe in 
Maschinencode 

Diesem Brief ist ein kurzes 
Programm in Maschinen¬ 
code beigefügt, mit dessen 
Hilfe man sich das Ausgeben 
von Texten aus Assembler¬ 
programmen heraus erleich¬ 
tern kann. Es bedient sich 
dazu einer Routine des 


ROMs, die ursprünglich 
dazu benutzt wurde, Fehler¬ 
meldungen auszugeben. 
Deshalb muß man auch vor 
dem Anspringen dieser Rou¬ 
tine mit einem CALL &B900 
(KL U ROM ENABLE) das 
obere ROM anspringbar ma¬ 
chen. Danach wird das DE- 
Register mit der Adresse des 
ersten Buchstabens des aus¬ 
zugebenen Textes geladen. 
Jetzt kann man die eigentli¬ 
che Ausgaberoutine mit ei¬ 
nem Jump &CB3C aufrufen. 
Trifft die Ausgaberoutine in¬ 
nerhalb des Textes auf ein 
Byte mit dem Wert &00, so 
sieht es diese Stelle als Ende 
des Textes an und beendet 
die Textausgabe. Die Posi¬ 
tion des ersten Buchstabens 
kann, wie bei der Benutzung 
des Print-Befehls, durch eine 
Locate-Anweisung fest gelegt 
werden oder durch dem Text 
beigefügte Steuerzeichen er¬ 
folgen. 

Aufgrund der Tatsache, daß 
diese Subroutine nur aus vier 
Zeilen besteht, habe ich mir 
erlaubt, Ihnen das Pro¬ 
gramm lediglich als Listing 
zuzusenden. Es ist frei im 
Speicher verschiebbar. 

A000 CD00B9 CALL &B900 

A003 110040 LD DE, Adresse des 

Textes 

A006 C33CCB JP &CB3C 
A009 C9 RET 

Das Programm wurde auf ei¬ 
nem CPC 464 mit Hilfe des 
Vortex Maschinensprache¬ 
monitors erstellt. Ob es auch 
auf den anderen Amstrad- 
Modellen läuft, kann ich 
nicht sagen. 

Alexander Spanner 
Langenfeld 

Umsetzen von Disketten 
von CP/M auf MS-D0S- 
Format 

Ich besitze einen Amstrad 
CPC 464 mit Amstrad 
3-Zoll-Erstlaufwerk DDI und 
habe als Zweitlauft\>erk den 
BA SF-MFD-6162 ange¬ 

schlossen; technische Daten 
des Zweitlaufwerkes: 

— 3 1 /2-Zoll-Laufwerk, 

— Zweimal 40 Tracks (beid¬ 
seitig), 

— Kapazität 600 kByte brutto- 
(beidseitig). 

Beim Zweitlaufwerk hat die 
3 1/2-Zoll-Diskette das glei¬ 
che Format wie die 3-Zoll- 


Diskette des Erstlaufwerkes 
(180 kByte, einseitig, AMS- 
DOS, CP/M 2.2). 

Da ich zusätzlich einen PC 
(IBM-kompatibel) mit 3 1/2- 
ZoII-Laufwerken habe (720 
kByte, es kann aber auch 360 
kByte lesen, MS-DOS, Ver¬ 
sion 3.30), möchte ich den 
Schneider CPC 464 als Er¬ 
fassungsmaschine benutzen, 
die erfaßten Daten auf 
3-Zoll-Schneider-Erstlauf- 
werk abspeichern, nach Er¬ 
fassungsende mit Software 
die erfaßten Daten vom DDI- 
Erstlaufwerk auf BA SF- 
MFD-61 62-Zweitlaufwerk 
(360 kByte) transferieren, 
die Diskette anschließend am 
PC-Laufwerk (IBM-kompati- 
bei) hineinstecken und die 
Daten weiterverarbeiten. 
Frage: 

— Gibt es ein solches Pro¬ 
gramm, und kann man 
auch umgekehrt die Daten 
vom PC nach CPC 464 
transferieren ? 

— Gibt es dazu einen Emula¬ 
tor, der CP/M-Program- 
me auf MS-DOS abarbei¬ 
ten kann ? 

— Wer ist der Anbieter? 

Für Ihre baldige Antwort 
wäre ich Ihnen sehr dank¬ 
bar. 

Reiner Meisel 
Rosenheim 

Sie sprechen da ein Problem 
an, das uns immer häufiger 
zugetragen wird, da viele 
Umsteiger vom CPC auf den 
PC ihre einmal angelegten 
Daten nicht ein zweites Mal 
mit mühevoller Arbeit einge¬ 
ben möchten. 

Eine Standardlösung zu bie¬ 
ten, sehen wir uns momentan 
noch außerstande. Es existie¬ 
ren zwar einige Programme, 
mit deren Hilfe man einen 
bequemen Datentransfer per 
Diskette erreicht, doch sind 
diese meist nur mit bestimm¬ 
ter Hardware hunderprozen- 
tig zu nutzen. 

Der wohl einfachste Weg, 
einen sicheren Datentransfer 
vorzunehmen, ist der über 
die seriellen Schnittstellen 
der Rechner. Verbinden Sie 
diese mittels Null-Mo- 
dem-Kabel. Das Übertra¬ 
gungsprogramm Kermit, 
was sich im übrigen auf der 
Databox dieses Heftes befin¬ 
det, bringt nun die Daten im 
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ASCII-Format von Rechner 
zu Rechner. 

CP/M-Emulatoren für MS- 
DOS-Rechner gibt es bereits 
günstig auf dem Public-Do- 
main-Markt zu kaufen. Ein 
sehr leistungsfähiges Pro¬ 
gramm bietet beispielsweise 
PD-Service Lage 
Hasselstr. 38 
4937 Lage 

an. Dieser Z-80-Emulator ist 
dort unter Diskettennummer 
A 457 zu erstehen. 

Red. 

Compilersuche 

Ich besitze noch den CPC 
6128 und habe ein recht lan¬ 
ges Plotterprogramm ge¬ 
schrieben (23 kByte). Nun 
möchte ich im Programm 
möglichst alles compilieren. 
Könnten Sie mir einen guten 
Compiler, der auch die 
Cosinus- und Sinusfunktion 
compiliert, angeben und mit¬ 
teil en, wo ich ihn kaufen 
kann, da ich das Programm 
sehr schnell benötige ? 

PS: Gibt es ein Programm, 
mit dem ich den Bildschirm 
direkt an den Drucker geben 
kann ? 

Linus Rauer 
Ringsheim 

Für beide Probleme bietet 
der DMV-Verlag geeignete 
Lösungen an. 

Ein leistungsstarker BASIC- 
Compiler, der auch Winkel¬ 
funktionen mit übersetzt, ist 
der Fast-Basic-Compiler. 
Das Programm Copy-Shop 
ist speziell für Hardcopys 
programmiert worden. 

Beide Programme sind beim 
DMV-Verlag käuflich zu er¬ 
werben. 

Red. 

Korrektur zur Videover¬ 
waltung aus Heft 6/89 

Bei der Benutzung des Kas¬ 
settenlaufwerks treten Feh¬ 
lermeldungen auf die durch 
eine kleine Korrektur verbes¬ 
sert werden können. Anbei 
finden Sie auch eine Lösung 
zum Druckerproblem, von 
dem einige Leser betroffen 
sind. 

Korrektur für Kassettenbe¬ 
nutzer: 

Der abgedruckte Vorschlag 
zum Gebrauch des Kasset¬ 


tenrecorders ist leider nur 
die halbe Lösung. Hier nun 
das korrekte Vorgehen: 

1. ) Zeile 1290 löschen. 

2. ) Neue Zeile 1290: 

1290 PRINT:PRINT“ Bitte Band 
auf Zählerstand 000 zurückspu¬ 
len, dann Taste drückenCALL 
&BB18:SPEED WRITE 1:CLS: 
PRINT:PRINT 

“ Bitte REC & PLAY drücken, dann 
eine Taste. “:CALL &BB18 

3. ) Zeile 185 einfügen: 


1040 busy = (VAL(MID$(BIN$(INP 
(&F5 00,8),2,l))-l)*(-l):IF 

wahl=l THEN IF busy=l THEN GOTO 
1440 ELSE L0CATE 1,6: PRINT“ Der 
Drucker ist nicht bereit 
! 11 : PRINT ton$;: FOR i=l T0 
1000 :NEXT:L0CATE 1 , 6 :PRINT 
SPACES (40): GOTO 990 


Sollte es trotz dieser Verän¬ 
derung dennoch nicht funk¬ 
tionieren, lassen Sie die 
Druckerabfrage einfach weg 
(so geht es auf jeden Fall): 
1040 IF wahl=l THEN GOTO 1440 

Marc Roßkopf 
Cloppenburg 

Druckeranpassung der 
Programme Picture- 
Printer und 3D-Plot 


Ich besitze ebenfalls einen 
Seikosha-Drucker (den SP- 
180AI) und hatte mit Context 
(und mit anderen Program¬ 
men) dasselbe Problem. Ich 
nehme an, daß Sie beim Kauf 
Ihres neuen Druckers auch 


ein neues Verbindungskabel 
zum Computer gekauft ha¬ 
ben. Eine Lösung Ihres Pro¬ 
blems müßte sich darin fin¬ 
den lassen, daß Sie das alte 
Druckerkabel verwenden 
können; wenn Sie dies jedoch 
(mit Ihrem alten Drucker) 
verkauft haben, so können 
Sie am Verbindungskabel 
zum Computer den Draht Nr. 
14 (am roten Streifen mit 
dem Zählen beginnen, und 
zwar auf der Seite, auf der 
sich ein kleiner Pfeil (am 
Eingang zum Computer) be¬ 
findet!!!) unterbrechen, das 
heißt, einfach mit einer Zan¬ 
ge abzwicken. Falls Sie sich 
an dieses Projekt nicht so 
recht heranwagen, so kön¬ 
nen Sie dies ja auch von ei¬ 
nem Fachmann erledigen 
lassen. 

Christoph Lauble 
Fohrenbühl 

Korrektur zum “Zauber¬ 
reich der Grafik“, 

Heft 3/89 

Ihre Serie “Im Zauberreich 
der Grafik“ gefällt uns aus¬ 
gezeichnet. Während wir uns 
mit den abgedruckten Pro¬ 
grammen beschäftigten, fie¬ 
len uns folgende Fehler auf: 

1. In dem Programm “Qua- 
drale-Grafik-Grundform “ 
fehlt eine 'Draw’-Anwei- 
sung. Daher muß Zeile 95 
lauten: 

95 DRAW -x,y 

2. In der erweiterten Form 
des Programms “Pinselgra¬ 
fik-Grundform“ sind die Zei¬ 
len 60 und 190 falsch. Sie 
müssen lauten: 

60 a=380:u=0: v=-4: GOSUB 160 
190 K0VE x+p+u,y:PRINT f$; 

3. In dem Programm “Pin- 
selgrafik-Kreisgrundform “ 
ist Ihnen ein Druckfehler un¬ 
terlaufen. Zeile 60 wurde 
versehentlich mit Zeile 50 in 
einer Reihe gedruckt. 

Heft 6/89 

1. Bei der Erweiterung des 
Programms “Ausgangsbild 
zur 'Oma'“ zu “Oma mit 
Spitzenhäubchen “ muß Zeile 
31 lauten: 

31 ORIGIN 0,0:FILL1: 

MOVE 639,0:FILL1 

2. In dem Programm “Mo¬ 
saikstern “ muß Zeile 20 wie 
folgt heißen: 


185 MODE 2:PRINT:PRINT“ Zähler 
bitte auf 000 setzen, dann Ta¬ 
ste drücken. “: CALL &BB18: CLS 

4. ) Die beim Kassettenbe¬ 
trieb nicht funktionierende 
Diskettenfehlerabfangrouti- 
ne löschen: 

DELETE 3650-3700 
Neue Zeile 3650: 

3650 RETURN 

5. ) Um die Blocklesemel¬ 
dung zu unterdrücken, in al¬ 
len Zeilen, in denen etwas 
geladen beziehungsweise ge¬ 
schrieben wird, ein 7’ er¬ 
gänzen: 

Im Ladeprogramm VI¬ 
DEO. BAS: 

190 CLS:RUN “! VIDE02. 
PGM: 

Im Hauptprogramm 
VIDEÖ2. PGM: 

190 OP EN IN “/ VIDEO. 
DAT“: . 

1300 OPENOUT“'.VIDEO. 
DAT“ 

Korrektur zum Druckerpro¬ 
blem: 

Das Programm liest eine 
Zahl mit ’online = INP 
(&F500) ’ ein. Im Regelfall 
ist dies bei bereitem Drucker 
(ONLINE) 26, bei nicht be¬ 
reitem 90. Diese Möglich¬ 
keit, den Drucker abzufra¬ 
gen, wurde in Ihrer Zeitung 
bereits in vielen Program¬ 
men verwendet (siehe zum 
Beispiel 'Superplan ’). Es 
kann nun aber passieren, 
daß bei dem gleichen 
Drucker zeitweise verschie¬ 
dene Zahlen auftreten (war¬ 
um, weiß ich nicht). Hier nun 
die (wahrscheinlich auf allen 
Druckern mögliche) Lösung: 
Bitte verändern: 


Seit einiger Zeit bin ich end¬ 
lich stolzer Besitzer eines 
Druckers, und zwar eines 
Panasonic KX-P 1081. 

Sofort habe ich mich an eine 
Anpassung des Hardcopy¬ 
programms Pi cture-Printer 
(Heft 5/88) gemacht, hatte 
aber bis jetzt keinen Erfolg; 
der Zeilenvorschub war un¬ 
gefähr doppelt so groji, wie 
er sein sollte, auch das Um¬ 
stellen der DIP-Schalter hat¬ 
te nicht den gewünschten Er¬ 
folg- 

Ich würde mich sehr freuen, 
wenn Sie mir dabei helfen 
würden, eine Lösung des 
Problems zu finden, da ich 
sonst keine funktionierende 
Hardcopyroutine hätte, die 
es ermöglicht, Bilder auf 
DIN A4 auszudrucken. 

Bei Ihrer Hardcopyroutine 
aus dem Programm 3D-Plot 
(Heft 4/87) stellt sich dassel¬ 
be Problem: Der Zeilenvor¬ 
schub ist auch hier doppelt 
so groß wie normal. Bei die¬ 
sem Programm kann ich mir 
aber überhaupt nicht helfen, 
da ich hier noch keine Gele¬ 
genheit zum Anpassen gefun¬ 
den haben. Könnten Sie mir 
bitte auch hierbei helfen ? 

Fabian Vogelbruch 
Hattingen 15 

Ihr Problem liegt mit großer 
Wahrscheinlichkeit an Ihrem 
Druckerkabel. Wie man sich 
hier helfen kann, beschreibt 
der folgende Leserbrief. 

Red. 

Zum Leserbrief von Herrn 
Henning Lühken, 

Heft 8/89 
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20 a=0:b=0:f=1.02:n=2l4:r=2: 
w= 45: GOSUB 40 

Frank und Markus Stenner 
Haltern 


Compiler 

Seit Erscheinen hin ich inter¬ 
essierter Leser der PC Inter¬ 
national. Stark finde ich Ihre 

Softwarezusammenstellun¬ 
gen wie zum Beispiel “Das 
Software-Experiment“, die 
beiden “Databox“-Disketten 
zu SH 7-88 (Wann kommt ein 
neues Sonderheft zur CPC- 
Reihe?), aber ganz beson¬ 
ders habe ich mich über das 
Erscheinen des Fast-Basic- 
Compilers gefreut. Endlich 
kann ich unter anderem mei¬ 
ne Lottoprogramme mit ih¬ 
ren zeitaufwendigen Rechen- 
und Vergleichsroutinen 
schneller machen, dachte 
ich. Leider bläht besagter 
Compiler die Programme so¬ 
weit auf, daß ich die Compi- 
late nicht mehr in den Ar¬ 
beitsspeicher bekomme be¬ 
ziehungsweise diese wegen 
Platzmangels nicht mehr 
zum Laufen bringe. Da ich 
kein aus gebuffter Profi bin, 
ist es mir bisher nicht gelun¬ 
gen, in diesem speziellen 
Falle eine brauchbare Lö¬ 
sung zu erzielen. Deshalb 
hier meine Bitte. Können Sie 
in Ihrer Zeitschrift künftig 
nicht auch Tips und Tricks 
über den Umgang mit dem 
Compiler bringen? Vielleicht 
haben auch einige Leser 
schon Erfahrungen mit die¬ 
sem Produkt und möchten 
diese weitergeben ? 

Alfred Koch 

Saarbrücken 


Assemblertips 

Ich habe Fragen, Lösungen 
für Probleme, die mir selbst 
Schwierigkeiten machten, 
und Programmangebote. 

Zunächst die gesammelten 
Fragen, die ich mir nicht 
selbst beantworten konnte: 

I. Woran liegt es, daß bei al¬ 
len CPC 464 (die mir be¬ 
kannt sind) der CALL 
&BD19 (Wait Frame Fly) 
nicht richtig funktioniert? 
Schon zu Anfang war mir 
aufgefallen, daß ein ASCII- 
Zeichen, welches man per 
Programm über den gesam¬ 


ten Bildschirm schickt, an 
bestimmten Stellen nicht 
vollständig oder gar nicht 
gezeichnet wird. Dies hängt 
in jedem Fall mit dem CALL 
&BD19 zusammen. Eine 
Analyse im ROM hat mich zu 
dem Schluß gebracht, daß 
die Erscheinung durch einen 
logischen Fehler entsteht. 
Aber welchen? 

2. Wie kommt man am Ende 
eines eigenen Programms, 
das man mit Execute-Adress 
abgespeichert hat, bei dem 
Aufruf mit RUN “NAME. BIN“ 
wieder normal ins BASIC zu¬ 
rück? Im ROM habe ich ver¬ 
folgt, daß die Rücksprung¬ 
adresse vernichtet wird. 

3. Wie kann man eigene 
ASCII-Symbole in Turbo- 
Pascal erzeugen? 

4. Wodurch kann die Zerstö¬ 
rung des I. Sektors auf der 1. 
Spur (Directory) einer Dis¬ 
kette herrühren? Ich habe 
die Vermutung, daß die Dis¬ 
kette sich manchmal aus dem 
Mitnehmer ausklinkt. Auch 
war ein BASIC-Programm 
einmal zerstört. Ich habe die 
Hoffnung, mein altes Disket- 
ten-Laufwerk in Zukunft 
ohne Risiko benutzen zu 
können. 

Und hier einige wertvolle Er¬ 
kenntnisse, die ich erlangt 
habe: 

1. Mit WIDTH 255 kann man 
vom BASIC aus den automa¬ 
tischen Zeilenumbruch aus¬ 
schalten. Wichtig für die 
Grafik! 

2. Ein Maschinenprogramm 
arbeitet nur bei bestimmten 
Arten des Aufrufs (zum Bei¬ 
spiel aus Dirkt-Modus, 
BASIC-Prgr.) aber zum Bei¬ 
spiel nicht beim Aufruf per 
Interrupt. Grund könnte eine 
falsche ROM-Selektierung 
sein. 

3. Beim Turbo Pascal 3.0 
gibt die Standardvariable 
’keypressed’ nicht an, ob 
eine Taste gedrückt ist, son¬ 
dern nur, ob ein Zeichen vom 
Puffer wiedergegeben wird. 
Ein kleines Versuchspro¬ 
gramm, welches den Zustand 
von ’keypressed' auf den 
Bildschirm ausgibt, zeigt bei 
Tastendruck die Logik: Erst 
erfolgt die Meldung des Ta¬ 
stendrucks, dann wird ge¬ 
wartet. Wenn nun die Taste 
immer noch gedrückt ist. 


folgt ein ständiges Umschal¬ 
ten zwischen ’TRUE’ und 
’FALSE’, die Wiederholfre¬ 
quenz wird sichtbar. 

4. Rekursive Programme, 
die die Grafik-Unterroutinen 
benutzen, funktionieren in 
Turbo Pascal 3.0 manchmal 
nicht, da bei allen INLINE- 
Zeilen ein #C9 zuviel vor¬ 
handen ist. 

5. Entgegen dem CPC 464 
INTERN wird beim CALL 
#BD31 (MC SEND PRIN¬ 
TER) nicht gewartet, bis der 
Drucker ein Zeichen emp¬ 
fängt. Es findet keine BUSY- 
Abfrage statt! 

6. Ein a b im BASIC ent¬ 
spricht natürlich einem 
ROUND(a)/b und nicht ei¬ 
nem ROUND (a/b). Wichtig 
zu beachten! 

7. Bei einem CALL vom 
BASIC aus ist es vorteilhaft, 
die genauen Inhalte der Re¬ 
gister zu kennen. Zum Bei¬ 
spiel lade ich den letzten Pa¬ 
rameter eigentlich nur noch 
über DE. Hier eine Zusam¬ 
menfassung, die ich vor eini¬ 
ger Zeit für mich geschrieben 
habe: 

Ein CALL sieht so aus: CALL 
< adr > (,< Parameter > ) 

Es können bis zu 32 Parame¬ 
ter (Integer) angegeben 
werden. 

Bei dem Aufruf der <adr> 
im RAM sind die Register fol¬ 
gendermaßen geladen: 

A = Anzahl der Parameter 
F = Nur Zero gesetzt , 
wenn A=0 

B = 32-Anzahl der Para¬ 
meter C = &FF 
DE = letzter Parameter 
oder CALL-Adr., wenn A 
= 0 

HL = BASIC-PC (zeigt 
hinter Zeilenende bezie¬ 
hungsweise 

IX = zeigt auf letzten 
CALL-Parameter auf dem 
Stuck 

SP = IX-6 (s. RST #18) 
Alle Register können zerstört 
werden - aber nicht SP. Auf 
die Parameter kann auch 
über den Stack zugegriffen 
werden. Jedoch müssen da¬ 
bei die sechs Bytes vom RST 
#18 erhalten werden. 

Anselm Kröger-Vodde 
Wolfsburg 13 

Vielen Dank für Ihre vielen 
Tips. Zu Ihren Fragen muß 
folgendes bemerkt werden: 


1. und 2. müssen wir an un¬ 
sere Leser weitergeben. 

3. Es gibt keine direkte Mög¬ 
lichkeit, unter Turbo Pascal 
Zeichen umzudefinieren, da 
es keine entsprechenden Be¬ 
fehle zur Verfügung stellt. 
Durch ein kleines Maschi¬ 
nenprogramm, welches die 
entsprechenden Adressen 
mit Werten belegt, müßte 
dies jedoch möglich sein. 

4. Grundsätzlich kann man 
die Diskette, auf welcher 
sich ein solcher Fehler 'ein¬ 
geschlichen’ hat, ruhigen 
Gewissens neu formatieren. 
Diese Art von Fehler läßt 
sich jedoch durch unser Pro¬ 
gramm Backup-Cat aus der 
Ausgabe 3/89 verhindern, 
welches auf den Spuren 40 
bis 42 eine Sicherheitskopie 
des Directories einer Disket¬ 
te anlegt. Tritt nun ein sol¬ 
cher Fehler auf, können die¬ 
se Spuren wieder zurückko¬ 
piert werden. 

Red. 

Letzte Hoffnung 

Ich habe eine für mich wich¬ 
tige Frage, in der Sie meine 
letzte Hoffnung sind! Mir 
wurde heimtückisch, als ich 
am Sommerfest meinen CPC 
6128 vorführte, beim Laden 
von meinem Spiel (ACE OF 
AC.ES/BASIC) der Stecker 
herausgezogen. Das File 
zum Laden des Spieles 
(DISK.BIN) geht nun nicht 
mehr zu laden! Wie ich aber 
mit meinem Diskettenmoni¬ 
tor (D1MO 3.0) fest st eilte, ist 
auf der Disk noch alles vor¬ 
handen! Wurde etwa das La¬ 
deprogramm (disk.bin) ge¬ 
löscht und nur nicht wieder 
aus dem Katalog heraus ge¬ 
löscht? Auf dem gelöschten 
User (der User, wo alle ge¬ 
löschten Programme hin ver¬ 
bannt werden) der Disk 
(Poke &a701,221) ist kein 
Bak oder Bas des Ladepro¬ 
gramms vorhanden! 

Können Sie mir helfen ? Wie 
kann ich diese Sache wieder 
geradebiegen ? 

Marcos de Azevedo 
Meerbusch 3 

Leider können wir Ihnen 
hierbei nicht helfen, da es 
sich bei diesem Programm 
um ein geschütztes Pro¬ 
gramm handelt. Der einzige 
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Tip, den wir Ihnen geben 
können, ist, daß Sie sich an 
Ihren Händler oder besser 
gleich an die Softwarefirma 
wenden und dann dieses Pro¬ 
blem schildern. Vielleicht 
tauscht man Ihnen ja die Dis¬ 
kette um. 

Red. 

Kompatibilität 

Ich bin der Besitzer eines 
Amstrad LQ3500 (24 Na¬ 
deln) und habe folgende Fra¬ 
gen zur Kompatibilität des 
Druckers an einem Compu¬ 
ter der Commodore-Amiga- 
oder an einen Computer der 
Commodore-128-Serie. Ist 
eine solche Zusammenstel¬ 
lung möglich? Wenn nein, 
geht dies mit einem Inter¬ 
face ? Falls dies möglich sein 
sollte, welchen Namen hat 
das Interface, und wie teuer 
würde dieses Interface sein ? 

PS: Der Drucker ist Epson- 
und IBM-kompatibel! 

Marcos de Azevedo 
Meerbusch 3 

Sicherlich wird es später kei¬ 
ne Probleme mit der Weiter¬ 
benutzung Ihres Druckers 
geben. 

Red. 


CPC 6128 unter 
Word Star 3.0 

Seit kurzem bin ich Besitzer 
eines CPC 6128, den ich 
auch zur Textverarbeitung 
unter Wordstar 3.0 benutze. 
Hierbei stellte sich mir die 
Frage, ob es möglich sei, die 
von Wordstar benötigten 
Overlay-Dateien 
WSMSGS.OVR und WSOV- 
LY.OVR in den zweiten 64 
kByte abzulegen, wodurch 
zum einen die Zugriffszeit 
stark verkürzt und zum ande¬ 
ren der Diskettenplatzbedarf 
dieser Dateien für Texte zur 
Verfügung stehen würde. 

Außerdem fielen mir bei der 
Installation von Wordstar 
3.0 die Patchadressen 02C3 
(SWIN) und 02C9 (SWOUT) 
auf, welche beide nicht be¬ 
legt sind. Können hier 
Adressen eingegeben wer¬ 
den, mit denen ein Bank¬ 
switching auf die zweiten 64 


kByte des CPC 6128 möglich 
ist, und falls dies der Fall ist, 
welche sind es ? 

Frank Bondsa 
Lübeck 1 

Uns ist leider keine Möglich¬ 
keit bekannt, die Overlay- 
Dateien in die zweite Ram- 
bank zu legen, so daß Word¬ 
star auch darauf zugreifen 
kann. Da helfen Ihnen auch 
nicht die unbelegten Adres¬ 
sen weiter. 

Aber vielleicht kann hier ein 
versierter WordStar-Anwen- 
der weiterhelfen. 

Red. 

“Fehler“ beim achten Bit 
unter BASIC und 
CP/M 2.2 

Herr Stöbe schrieb in seinem 
in Heft 8/89 veröffentlichten 
Leserbrief, bei der Arbeit mit 
einer 8-Bit-Druckerschnitt- 
stelle unter BASIC und 
CP/M 2.2 trete der Fehler 
auf, daß die Zeichen &AO 
bis &AF (169 bis 175) nicht 
korrekt gedruckt würden, 
ln Wirklichkeit ist diese Tat¬ 
sache keineswegs ein Fehler, 
sondern ein besonderer “Kom¬ 
fort“ des Betriebssystems: 

Im Betriebssystem-RAM zu¬ 
mindest der CPCs 664 und 
6128 existiert eine Konver¬ 
tierungstabelle, die einer 
Anzahl von ASCII-Zeichen 
bei der Druckerausgabe je¬ 
weils einen anderen Code zu¬ 
ordnet. Sie kann vom Anwen¬ 
der nach Bedarf geändert 
werden. So kann man z. B. in 
einem deutschsprachigen 
Anwenderprogramm die Um¬ 
laute in einem beliebigen 
Codebereich definieren und 
durch die Anlage einer geeig¬ 
neten Kon vertierungstabeüe 
dafür sorgen, daß diese Son¬ 
derzeichen trotzdem korrekt 
aus gedruckt werden. Leider 
wird bereits beim Einschal¬ 
ten des Rechners eine solche 
Tabelle angelegt, die eben 
die Codes von &AO bis &AF 
durch andere ersetzt. Beim 
Arbeiten mit 8-Bit-Zeichen 
oder 8-Bit-Grafiken kommt 
es daher zu Komplikationen. 
Was kann man nun dagegen 
tun? 

Am Anfang der Zuweisungs¬ 
tabelle steht ein Byte, das die 


Anzahl der Tabelleneinträ¬ 
ge, also der zu konvertieren¬ 
den Zeichen, angibt. Dieses 
Byte muß auf null gesetzt 
werden. 

In BASIC geht das nur durch 
einen direkten Speicherzu¬ 
griff: 

POKE &B804.0 
In Maschinensprache kann 
nmn das natürlich entspre¬ 
chend machen, man kann je¬ 
doch auch eine reguläre Be¬ 
triebssystem-Routine ver¬ 
wenden: 

LD HL,$ ; Zeiger auf ein Null¬ 
byte 

NOP ; das Nullbyte 
CALL #BD58; MC Zeichenzuord¬ 
nung 

All dies gilt, wie schon ange¬ 
deutet, nur für die beiden 
“großen“ CPCs. Ich vermu¬ 
te, daß der CPC 464 gar kei¬ 
ne Druckzeichenkonvertie¬ 
rung kennt. Falls dies zu¬ 
trifft, tritt der “Fehler“ hier 
ohnehin nicht auf. Anderen¬ 
falls bleibt ein CPC-464- 
Spezialist aufgerufen, der 
Leserschaft an dieser Stelle 
mitzuteilen, wie sich das 
Problem auf diesem Rechner 
lösen läßt. 

Marek Musial 
Berlin 49 

Zu viel PCs? 

Ich würde gerne wissen, 
warum die PCs immer noch 
in der PC International so 
stark vertreten sind? Dafür 
gibt ’s doch die ’ DOS Inter¬ 
national’ und die ’PC-pur’. 
Wir CPC-User haben nur die 
CPC International. 

Anstatt des PC-Teils sollten 
Sie mehr Software-Reviews 
und Spieletips sowie Tips & 
Tricks abdrucken. In der 
8/89 waren z. B. nur drei 
Spieletips und zwei Spiele- 
Pokes. Außerdem funktionie¬ 
ren die Geheimbefehle IXN 
und IXL etc. auch auf den 
CPCs. 

Oliver Mayer 
Köln 71 

Die PC Amstrad Internatio¬ 
nal gibt es nun seit fast fünf 
Jahren für den Schnei¬ 
der/ Amstrad-An wender. 
Damals in den Anfängen gab 
es nur den CPC, über den 
wir berichten konnten, dies 
hatte sich aber nach einiger 


Zeit geändert, als der JOY¬ 
CE und PC herauskamen. 
Da war es eigentlich mehr 
als natürlich, auch darüber 
zu berichten und diese neuen 
Computer in unserem Heft 
aufzunehmen. Die klare Fol¬ 
ge war weniger Platz für den 
CPC, so daß wir versucht ha¬ 
ben eine gerechte Verteilung 
der einzelnen Rechner zu 
finden, was auch soweit ge¬ 
lungen ist. Gewisse Schwan¬ 
kungen also. 

Red. 

Heft 6/89 S. 52f 

Ich beziehe mich auf Heft 
6/89 S. 52 f 

Die Bestimmung des größten 
gemeinsamen Teilers G zwei¬ 
er Zahlen läßt sich mit der 
Funktion modulo (BASIC 
mod) recht einfach be¬ 
rechnen. 

10 Input a 
20 Input b 
30 c=a mod b 

40 if c=0 then g=B:goto 60 
50 a=b:b=c goto 30 
60 ? "Größter gemeinsamer Tei¬ 
ler ist ";G 

Vielleicht können Sie diese 
Anregung für die Spalte 
“Tips & Tricks “ gebrauchen, 
zumal der Befehl MOD im 
Handbuch kaum erwähnt ist. 

Werner Graap 
Neustadt (Hess) 


Farbbandauffrischung, 
Heft 7/89 

Im Heft 7/89 wurde ein Li- 
sting zur Farbbandauffri¬ 
schung nicht korrekt ab ge¬ 
druckt. Hier das vollständige 
Listing: 

20 MODE 2:INPUT“Gib Auffri¬ 
schungszeit in Minuten ein“; 
fzeit 

30 azeit=TIME:ezeit=fzeit*l 
8000+azeit 

40 WIDTH 25 5: PRI NT # 8, CHR$ 
(27)+"A“+CH R$(0); 

50 WHILE TIME<ezeit 
60 PRINT# 8,CHR$(27)+"K I, + 
CHR$(127)+CHR$(2); 

70 F0R n=l TO 639:PRINT#8, 
CHR$(0);:NEXT CHR$(27)+"@“; : 
CALL0 

80 WEND: PRINT #8 

Red. 
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-AMS-Line- 

Der direkte Draht zur Firma AMSTRAD 

Jeden Monat präsentiert die Firma AMSTRAD aktuelle Informationen. 


MS-DOS 3.3 oder MS-DOS 4.01 auf 
dem PC 1512 oder PC 1640 

Der Trend zu neueren, besseren Ver¬ 
sionen veranlaßt viele Benutzer — häu¬ 
fig trotz auftretender Probleme auf 
ihre Software zu “updaten“. Für die 
Besitzer der oben genannten Gerätese¬ 
rien bleibt — da AMSTRAD aus li¬ 
zenzrechtlichen Gründen kein Update 
anbieten kann — nur der Kauf der 
“Standard-Version“ von Microsoft. 
Bei dieser sind natürlich Anpassungen 
an die Besonderheiten des Computers 
nicht vorhanden — Maus, Echtzeituhr 
und NVR-Bereich gehören eben nicht 
zu der normalen Ausstattung eines 
XTs. Der Umstieg auf das neue Be¬ 
triebssystem startet also in der Regel 
mit der Erkenntnis, daß die Maustasten 
nicht mehr funktionieren, die Uhrzeit 
nicht korrekt übernommen wird. 
NVR-Einstellungen nicht oder nur un¬ 
vollständig ausgeführt werden. Zum 
Glück für den Anwender kann nach 
dem ersten Schreck jedoch für einige 
Fälle Abhilfe geschaffen werden: Die 
Maus läßt sich durch einen Patch des 
3.2er Tastaturtreibers wiederbelebcn, 
die Uhrzeit, die bei einigen älteren 
BlOS-Versionen nicht übernommen 
wird, ebenfalls. Beim NVR ist da we¬ 
sentlich weniger möglich, lediglich die 
Übernahme der Einschaltfarben, die 
zum Beispiel nach einem CLS verlo¬ 
rengeht, läßt sich durch Aufruf des 
Programms ANSI.COM (z.B. in der 
AUTOEXEC.BAT) gewährleisten. 
Das Programm finden Sie auf der Be¬ 
triebssystemdiskette. 

Die eben angesprochenen Treiber kön¬ 
nen Sie gegen Einsendung einer forma¬ 
tierten Leerdiskette von uns erhalten. 
Bitte vergessen Sie nicht, daraufhinzu¬ 
weisen, daß Sie die Treiber für das 
neue Betriebssystem haben möchten, 
ln manchen Fällen ist leider aus den 
eingesendeten Disketten nicht ersicht¬ 
lich, zu welchem Zweck sie an uns ge¬ 
schickt wurden! 


Druckertreiber für LQ3500/5000 
unter Microsoft WORD 4.0 

Sollten Sie mit der angegebenen Kom¬ 
bination arbeiten, werden Sie wahr¬ 
scheinlich festgestellt haben, daß 
Microsoft die AMSTRAD-Drucker of¬ 
fensichtlich nicht kennt. Nach dieser 
Feststellung haben Sie wahrscheinlich, 
so wie ich, erleichtert den Treiber für 
EPSON-LQ-Drucker gefunden. Doch 
die Freude ist von kurzer Dauer — es 
funktioniert nur sehr wenig von den an¬ 
gebotenen Möglichkeiten; der Treiber 
für FX-kompatible Drucker läuft dage¬ 
gen wesentlich besser. 

Zum Glück gibt es für die WORD- 
Druckertreiber ein “Dekodierpro¬ 
gramm“, das es Ihnen erlaubt, Verän¬ 
derungen an den Treibern vorzuneh¬ 
men. Mit ein bißchen Fleißarbeit haben 
wir drei Druckertreiber erstellt, die 
den Fähigkeiten der AMSTRAD LQ- 
Drucker besser gerecht werden. Sicher 
bleiben auch hier noch Wünsche offen, 
aber die meisten Anwender werden das 
finden, was sie vielleicht schon lange 
gesucht haben: weitere Schriftgrößen, 
Proportionalschrift, kursiv und den¬ 
noch griechische Buchstaben (die aller¬ 
dings leider nicht kursiv) usw. 

Auch für diese Treiber gilt, was bereits 
oben gesagt wurde: Schicken Sie uns 
eine formatierte Leerdiskette, und ver¬ 
gessen Sie nicht, den Zweck dieses 
Schreibens anzugeben, das ist alles — 
gegen einen leserlich beschrifteten 
Rückumschlag haben wir natürlich 
nichts einzuwenden. 

Coprozessor für den PC2286 
In unseren Geräten werden die numeri¬ 
schen Coprozessoren mit dem vollen 
Systemtakt angesprochen. Dies ist ei¬ 
gentlich eher als Vorteil zu sehen. 
Beim PC2286 tritt hier allerdings ein 
Problem auf: Intel stellt keinen 80287 
für 12MHz Taktfrequenz her! Was ist 
also zu tun? Einige Firmen bieten zu 
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diesem Zweck - AMSTRAD steht mit 
diesen “Bedürfnissen“ ja nicht allein — 
speziell ausgetestete Coprozessoren 
an. Dabei handelt es sich um 80287er 
für 10MHz, deren Leistung ausreicht, 
um sie auch unter der höheren Taktfre¬ 
quenz zu betreiben. Keine Angst: Sie 
werden hier nicht über das Ohr gehau¬ 
en, die Sache ist völlig korrekt. 
Anbieter für solche Coprozessoren ist 
zum Beispiel die Firma 
Skirde 

Mainstraße 33 
6050 Offenbach 

Viel Speicher für PC2286 und 
PC2386 

Sollten Sie für Ihre Anwendung aus ir¬ 
gendwelchen Gründen Bedarf für viel, 
viel Festspeicher haben, diesen aber 
nicht “am Stück“ benötigen, so ist eine 
sehr elegante Möglichkeit, sich Wech¬ 
selfestplatten zu bedienen. Wir haben 
für Sie eine solche Anlage getestet - 
und zwar mit sehr erfreulichem Ergeb¬ 
nis. Die Firma Assmann bietet ein Sy¬ 
stem, bestehend aus Station A-DBAS. 
Steckkarte, Software und den mobilen 
Wechselfestplatten (20 bis 80 MByte) 
an. Die von uns getestete 40-MByte- 
Festplatte liefert im Test folgende Wer¬ 
te: Track to Track 7,65 ms, Random 
Access 18,16 ms. 

Nähere Angaben sind bei: 

Assmann Elektronic 
Auf dem Schaffe l 3 
5880 Lüdenscheid 
zu erfragen. 

Da in dieser AMS-Line wieder einmal 
Einsendungen “angefordert“ wurden, 
nochmal der Hinweis auf unsere neue 
Postanschrift - falls Sie die letzte Aus¬ 
gabe der AMS-Line versäumt haben: 
AMSTRAD GmbH 
Dreieichstr. 8 
6082 Mörfelden-Walldorf 

Ihre 



+++ ams-line +++ ams-line 


18 PC 11 ’89 


,e 


i Amor |I ST AR-DIVISION |l dk tronlcs CPC- || 



STAR-WRITER I 98,-- 
DATEI-STAR 98,- 


Kopierprogramme 


VAN DER ZALM 


ADRESCOMP 

5E 

DATENREM 

6E 

FAKTUREM 

7E 

FIBUPLAN 

148 

LAGDAT 

6E 

TEXTKING 

7E 

COMFORM 

4E 

ETATGRAF 

5E 

FIBUCOMP 

9E 

KALKUREM 

7£ 

PROFIREM 

13€ 

VOKABI 

58 


Supercopy 

Mastercopy 


|| CPC-Adventures: 


Diamant von Rabeniels (g) 
Drachenland (t) 

Reise durch die Zeit (t) 
Sherlock Holmes (g) 

Auftrag in der Bronx (g) 

Insel der Smaragde (t) 

Das Pharaonengrab (t) 

(t - text; g - Grafik; alle in 
deutsch) 

Je Diskette 49,- 


Mini Office II 


Text • Datenbank • Grafik • 
Etikettendruck • Tabellen- 
kalkulation • engl. Handb. ■ 
Komplett für nur 98,- 


für 464/664: 


Speech Synth. (ROM) 

148,- 

Speech Synth. (Kas.) 

98.- 

Lightpen (Kas.) 

68,- 

64 k Erweiterung 

168,- 

256 k Erweiterung 

348,- 

256 k Silicon Disk 

378,- 

Uhrenmodul 

128,- 

für 6128 : 


256 k Erweiterung- 

348,- 

256 k Silicon Disk- 

378,- 

64 k Silicon Disk- 

168,- 

Speech Syn. (ROM) - 

148,- 

Lightpen (ROM)- 

98,- 

Uhrenmodul- 

119,- 

Adapter (+) 

39,- 


Alles für Ihren CPC 


i Stop Press CPC (i|| 


Multlface II 



Seitengestalter 
... benötigt 64k Zusalzspei¬ 
cher bei 464 und 664 (nur 
dk'tronicsll) • mit orginal engl. 
Handbuch 

Stop Press 198,- 

St.Pr.+ AMX Maus 348,- 
...Handbuch deutsch 

19.80 


Stop Press Utilities 


Extra I 

Jede Menge neue Fontsl 

129,- 


(Kopierprogramm) 

Vollständige Kopiereinrich¬ 
tung lür Kassetten und Disk. 

Neue Version 178,— 

Adapter für 6128 39,- 


Dart - Scanner CPC 

ff 



ROMBOX (CPC) 118,~ I AMX ‘ Maus + 


VIDI (CPC) 348, 
VIDI (Joyce) 378, 
VIDI (IBM-KOMP.) 448, 


__ Grafikprogramm + Handbuch 
_■ ...Restaufkauf aus Konkurs- 
J70 " massell 



masse II Ähnlich AMX-Mouse für CPC. 

CPC 178,- Joyce 198,- Mit Grafiksofiwarel 179,- 


BTX-Modul 


Jetzt auch für CPC'sl Erlaubt 
den Anschluß Ihres CPC s an 
den BTX-Rechner der 
Bundes- Post I 398.- 


Schaltpläne CPC 



Mini Office II 
AMX-Mouse 
StopPress 


Verschiedenes: 


Turbo Toolbox 108, 
Vokabeltrainer: 

Kas./Disk 39,-/49, 
Verbentrainer: 

Kas. / Disk 49,- / 59, 


Spiele CPC 


• Sorcery • Poolbillard + 
Tennis (2 in 1) • Roland in 
Höhlen + In der Zeit + 
Hunchback ... (4 in 1) • 
Tennis 

je Diskette nur 25 

CPC-Spleletlita anlordom t 
(Kaianttan 20.- / Disketten 30, 


PROWORT 219. 
PROSPELL (dt.) 79 
MAXAM II 239, 


ADRESCOMP 

COMFORM 

DATENREM 

ETATGRAF 

FIBUPLAN 

LAGDAT 

PROFIREM 

VOKABI 

FAKTUREM 

KALKUREM 


LocoScript 2 148, 

LocoMail 1 128, 

LocoMail 2 211, 

LocoSpell 2 168, 

L. Script + Spell 248, 
LocoFile 168, 

LocoFont 89, 


Multiplan 198, 

dBase II 198, 

Tassword 8000 148, 


■ Headline 198,-- 

RH-DAT (Datenb.) 98,— 
Turbo Pascal 225,- 

-- Turbo TOOlbOX 1.0 148,- 

■ DR-Graph 198,- 

" DR-Draw 198,— 

Prompt (Dateiprg.) 69,- 
Prompt Druck 39,- 
" Mercator PCW 477,- 
“ MICA (CAD) 198,- 
“ Vokabeltrainer 59,- 
Verbentrainer 49,-- 
" Turbo Adress 98,- 
Turbo Faktura 148,-- 
Comac Litbox 148,- 
COMAC-Kass« Plusl 68,— 
| Vereinsverwalt, 198,— 
Schreiblehrgang 89,- 
.. PSE2 129,- 

.. Fleetstr. Edit. 199,- 
„ WS-Tuner 49,80 

„ Prospell Engl. 50,- 
_ Pascal M+T 198,— 

. FISKUS 1987-1988(89) 
_ Lohnsteuer-Jahresausgl. 

für nur 139,- 


Alles für Ihren Joyce |Lu,.Sgi;™ 


Supercopy 


STATISTIK-STAR 

Gralik- und Statislikprgamm 

nur 98,- 

STAR-MAIL 

Erweiterung von LocoScriptl 
Ausdruck aut Fremddruckern 
Serienbrielerstellung ... 

nur 98,- 

DATEI-STAR 

Daterverwalt ungssystem 

nur 98,-- 

MAILING-SYSTEM 

Softwarepaket: STAR-MAIL 
+ DATEI-STAR 189,- 
STAR-BASE 
Datenbanksystem 198,— 
BUSINESS-STAR 
Auftragsbearbeitung mit: 
Fakturierung / Lager/ Mahn¬ 
wesen / Datenverwaltung ... 

298,- 

FIBU-STAR plus 

Finanzbuchhaltung 298,-- 
LOCO-MERGE 
Serienbrieferstellung 98,— 


.benötigt RS232 1 78,- 


fi Mini Office* h\ 


Professional 
Textverarbeitung • DFÜ ■ 
Datenbank • Tabellenkalku¬ 
lation • Geschäftsgrafik • 
komplett für nur 138,- 

...deutscher Zeichensatz 
auf 3*-Diskette 29,80 


AMX-Maus Joyce* 


Steuerung Ihres Joyce Uber 
den Bildschirm. Mit hervor¬ 
ragender Grafiksoftware • mil 
engl. Handb nur 298,- 
Adapter 39,- 


Stop Press Joyce* 


Seitengestalter 
Sensationelles DTP-Progr. 
für den Joyce • engl. Handb. 
SlopPress 198,- 

St.Pr.+ AMX Maus 398,- 


Neu III Mini DOS 


Formatieren. Lesen und 
Schreiben von MS-DOS-Oisk. 
auf dem Joyce nur 50,- 


IdealePapierlührung lür Ihren 
Joyce-Drucker. 

nur 29,90 


Joyce-Scanner* 


MasterScan & Paint 

Scanner einfach auf 


Druckerkopf ste'cken und los 

geht'sl 

MasterScan 

298,-- 

MasterPaint 

78,- 

Pakeipreis nur 

338,- 

Adapter 

39,- 


Desktop Publlsher* 


Professionelles Desktop- 
Publishing auf Ihrem Joyce 

118,~ 

... kompl. mit AMX-Maua 

348,- 


dk tronics Joyce** 



Clock Chess 89 69,- 

Colossus Bridge 53,- 

Colossus Chess 69,- 

F.B. Boxing 69,- 

Foofball Fort, 69,- 

Jeweis Darkness 89,- 

Knighf Orc 69,- 

The Pawn 89,- 

Sfrike Force H. 69,- 

Tomahawk 79,- 

Anala of Rome 69,- 

Corruption 89,- 

Time and Magic 89,- 

Cyrus II Che88 89,- 

Stove Davia Snooker 69,- 
Trivial Purauit (engl.) 69,- 
Starglider 89.- 


** Aufgepasst ** 

Alle engl, Produkte 
worden mit orginal engl. 
Handbuch ausgeliefertl 
Für 29,80 (*) bzw. 19,80 
(*•) erhalten Sie zusätz¬ 
lich die jeweilige disch. 
Übersetzung. 

Joyce-Katalog 
Der Joyce ist noch 
länget nicht totl Wenn 
Sie näheres über unsere 
Joyce-Produkte erfahren 
wollen, so bestellen Sie 
sich doch einfach unse¬ 
ren Joyce-Kaialog 4,- 


Diskettenlaufwerke 


Zweitlaufwerke CPC: 
(aus eigener Produktion) 
3"-Laufwerk 298,- 

3,5"-Laufwerk 398,- 

5l/4"-Lautwerk 448,- 

... AMSTRAD - 

FD1* 299,- 

DD1 (mit Contr.) 499,- 

Anschlußkabel (*) 48,- 


Zweitlaufwerk Joyce: 
(aus eigener Produktion) 
3,5"-Laufwerk 348,- 

51/4 M -Laufwerk 448,- 

... AMSTRAD- 

FD4 499,- 


1 Zubehör | 

Schnittstellen 


von AMSTRAD 
Joyce RS232 198, 

CPC RS232 org. 198, 
... von Schneider 148. 


Schalt pläne 


... Joyce 
... PC 1512 
... PC 1640 
... Monitor PC 


Mouse Pad (Gloitmatw) 19,80 
Bildschirmfilter 59,- 

200 Endlosetiketten 16,- 


(ÜrCPC 664.6128 
md. Kabel 


Abdeckhauben CPC 


• Konsole CPC 

|e 19.80 

• Monitore 

je 34,80 

• DMP-Drucker 

je 24,80 

• Floppy s 

je 19,80 





NLQ401 19,80 

Star NL/LC10 24,80 

DMP-Drucker 19,80 

LQ3500-Drucker 29,80 

Joyce-Drucker 24,80 

PCW95l2-Dr, 19.80 


Competit. Pro 
... durchsichtig 
Quickshot II 


Verschiedenes 




MS-DO 


...3000 PD (5.25') je 8,~ 
...optional (3.5*) je 12,- 
...PD-Liste 9,80 

Superll 


Neu! Erwelferungsbox 



z urück an Absender 11 /69 

Interessiert an weiterem Info¬ 
material ? Kostenlose Gesamt¬ 
angebotslisten anfordern I 

O für CPC 6128, 664, 464 
O für Joyce 

O für PC (IBM-Kompatible) 


Straße. Hausnummer: 


PLZ, Ort: 


Telefon-Nummer: 


Dalum Unterschrift: 


Selbstverständlich lühren wir 
auch ein riesen Lager an 
PC-Hardware + Zubehör: 
AMSTRAD, Schneider, 
Unitron, Sanyo, Atari PC ... 
Fordern Sie unsere PC- 
Übersicht an. Bitte schriftl. I 


Karl-Heinz Weeske* Potsdamer Ring 10 • 
7 1 50 Backnang • Telex 724410 weeba d • 
Kreissparkasse Backnang - BLZ (60250020) 
74397 • Postgiro Stuttgart. 83326-707 • 
FAX: 07191 (60077) 11/89 


?7/=J=zl-=ri 






























































































i—Tips & Tricks 


Halb so groß 
bringt doppelt Platz 

Kleinschrift auf dem CPC 464 

Was tun, wenn man dringend 80 Zeichen pro Zeile vier¬ 
farbig auf den Monitor bringen will? Oder gar 40 Zei¬ 
chen mit 16 Farben? Sofern Sie einen CPC 464 besitzen, 
sollte dies nach dem Abtippen des folgenden Programms 
keine Schwierigkeiten mehr bereiten. 

“Kleinschrift“ erzeugt in jedem MODE eine Schrift, die halb 
so breit wie normal ist. Man hat also in MODE 0 jetzt 40, in 
MODE 1 80 und in MODE 2 sogar 160 Zeichen pro Zeile. 
Wozu soll das gut sein? 

Nun, dieses Programm ist besonders für Spiele und andere 
Programme gedacht, die in MODE 0 lauten. Wenn man hier 
umfangreiche Texte oder Statusanzeigen unterbringen will, 
läuft mit 20 Zeichen pro Zeile nicht viel. Durch das Pro¬ 
gramm aber kann man doppelt so viel Information unterbringen. 
Zuerst muß das Initialisierungsprogramm abgetippt und ab¬ 
gespeichert werden. Dann wird der BASIC-Lader eingege- 
ben und auf eine gesonderte Kassette abgespeichert. Dieser 
muß dann mit RUN gestartet werden. Wenn die Daten richtig 
eingegeben wurden, muß das Binärfile hinter das Initialisie¬ 
rungsprogramm gespeichert werden. 

Nicht ganz ernstzunehmen ist dieses Programm in MODE 2: 
160 Zeichen/Zeile! Wer kann das noch lesen? 

Die Bedienung vom BASIC aus ist kinderleicht. Zum Initiali¬ 
sieren startet man das Programm ’KLEINSCR.BAS’. 

Jetzt stehen drei neue RSX-Kommandos zur Verfügung: 

ILOC,x,y setzt den Cursor auf die Stelle x,y, wobei man dar¬ 
auf achten muß, daß einem natürlich die doppelte x-Breite 
zur Verfügung steht. 

IPRT,@a$ schreibt den String a$ an die durch ILOC festge¬ 
legte Position, wobei nur die Zeichen mit dem ASCII-Wert 
32-127 ausgegeben werden. 

IPRTL,@a$ wie IPRT,a$, aber nach dem Befehl wird der 
Cursor an den Anfang der nächsten Zeile gesetzt. 



Viel Schrift pro Zeile ist mit KLEINSCHRIFT kein Problem mehr 


Man kann natürlich auch zu Beginn eines BASIC-Pro- 
gramms diese RSX-Erweiterungen einbinden. Dazu muß le¬ 
diglich die Binärdatei KLEINSCR.BIN auf dem aktuellen 
Datenträger vorhanden sein. Man fügt nun an den Anfang 
des eigenen Programms folgende Zeilen ein: 

... MEMORY &A2ff 
... LOAD “kleinscr.bin“ 

... CALL &A300 

Die Punkte stehen für die Zeilennummern, die natürlich indi¬ 
viduell gewählt werden müssen. 

Achten Sie ferner beim Einbinden darauf, daß Sie den von 
KLEINSCR.BIN eingenommenen Speicherplatz nicht nut¬ 
zen, denn: halb soviel bringt zwar den doppelten Platz, aber 
doppelt genutzter Speicherplatz führt meist zum Absturz. 

Zum Schluß ein kleines Beispiel: 

...PAPER 0:PEN 3 
...ILOC,1,1 
...a$ = “HALLO“ 

...IPRT,@a$ 

schreibt “HALLO“ in PEN 3 links oben auf den Bildschirm, 
und das besonders platzsparend. 

(Guido Wimmel/jf) 


für 464 



10 'Kleinschrift Basiclader - 
88 by G. Wimmel Software 
20 MEMORY &9FFF:z=130:errf=0 
30 CLS:PRINT"Lese Maschinencode ..." 

40 FOR i=&A300 TO &A62F STEP 16 
50 sum= 0 

60 FOR O=0 TO 15:READ a$ :a=VAL(" &"+a$ ) 

70 sum=sum+a:POKE i+o,a:NEXT 
80 READ s$:s = V A L("&"+s$) 

90 IF sum=s THEN PRINT"Zei1e ";z;" Ok'';CHR 
$(13); ELSE PRINT“Fehl er in Zeile " ; z ; " !" 
:errf=1 

100 2 =z+ 10 :NEXT:IF errf THEN PRINT"Fehler 

in Datazei1en - Programm abgebrochen L": 

STOP 

110 PRINT"Alles richtig gelesen - drueck 

e Taste zum SpeichernCALL &BB06 
120 SAVE"KLEINSCR.BIN",b,&A300,&330:END 
130 DATA 01,09,A3,21,IF,A3,C3,Dl,BC,14,A3, 
C3,23,A3,C3,60,0743 

140 DATA A3,C3,66,A3,50,52,D4,50,52,54,CC, 
4C,4F,C3,00,FC,0801 

Listing KLEINSCR _ 


19 [4102] 


[ 1282 ] 
[2275 ] 
[925] 
[431] 

[2503] 
[2193] 
[ 886 ] 

[ 7899 3 


[5917] 


[7493] 

[1434] 
[3241 ] 

[2424] 


150 

DATA 

A6,09, 

A3,FE, 

01 , 

CO, 

EB , 

E 5 , 

CD, 

81 , 

A3, 

[2628] 

El ,46,23, 

5E , 23, 

089 D 









160 

DATA 

56,EB, 

3A , C8 , 

Bl , 

FE , 

01 , 

28 , 

06 , 

38, 

08 , 

[2570] 

3E,AO,18, 

06,3E, 

0 5 9 B 








[ 3366 ] 

170 

DATA 

50,18, 

02,3E, 

28 , 

32 , 

AE , 

A4 , 

C5 , 

7 E , 

E 6 , 

7F , 1 

FE,20, 

38,OB, 

06 5 D 








[3873] 

180 

DATA 

U,AF, 

A4,E5, 

CO, 

AF , 

A3 , 

CD, 

89 , 

A3, 

El , 

2 3,i 

CI,10, 

E9,C9, 

0 A 18 








[ 3205 ] 

190 

DATA 

CD,23 , 

A3,C3, 

1A, 

A4 , 

FE , 

02 , 

CO , 

7 A , 

B 7 , 

CO , 

7B.3D, 

FE,19, 

0894 









200 

DATA 

DO,32 , 

AC,A4, 

DD, 

7 E , 

, 03 , 

B 7 , 

, CO , 

DD , 

7 E , 

[2703] 

02 , 

30,32, 

, AD,A4, 

0844 









210 

DATA 

C9.2A, 

AC,A4, 

, 3A , 

,C8 

, Bl , 

FE . 

, 02 , 

28 , 

, 12 , 

[ 2682 ] 

3C , 

32 ,C8 

, Bl,CD, 

0 7 E 4 








[3262] 

220 

DATA 

1A,BC, 

,22, AA, 

, A4 

, 3 A 

,C8 , 

, Bl 

, 3D, 

, 32 , 

, C8 , 

Bl , 

C9,3E 

,80,CB, 

, 0833 








[2473] 

230 

DATA 

3C, 30 

, 02,3E 

, 08 

, 32 

, A9 , 

, A4 

, CD . 

, 1A 

, BC, 

22 , 

AA , A4 

,C9,D6 

, 06E5 








[3016] 

240 

DATA 

20,6F 

,26,00 

, 29 

, 29 

. 19 

■ EB 

,C9 

, 2 A 

, AA, 

A4 , 

06,04 

, C5 , 1A 

, 0535 









250 

DATA 

D5 , F5 

, E6 , FO 

, E5 

,57 

, CD 

, 37 

, A4 

.El 

, CD , 

[2870] 

26 , 

BC, Fl 

,87,87 

, OB 13 








[2041] 

260 

i DATA 

87,87 

, E5 , 57 

, CD 

. 37 

, A4 

, El 

, CD 

,26 

, BC , 

Dl , 

13 ,C1 

, 10,DE 

, 0915 








[ 3852 ] 

27C 

i DATA 

2A, AA 

, A4 , 3A 

,C8 

, Bl 

, FE 

,01 

, 28 

. ID 

, 38 , 

18 . 

3A . A9 

,A4 , FE 

,0744 







, 3E , 


280 DATA 

80,20 

, 07,3E 

,08 

, 32 

, A9 

, A4 

, 18 

, 10 

[ 1994] 

80 , 

32 , A9 

, A4,CD 

, 059E 










Listing KLEINSCR 


20 PC 11’89 







































Tips & Tricks—i 


290 DATA 20,BC,18,06,00,20,80,00,20,BC,22 , [4078] 
AA,A4,3A,AE,A4,0748 

300 DATA 57,3A,AD,A4,3C,32,AD,A4,BA,CO,3E, [3700] 
00,32,AD,A4,3A,0716 

310 DATA AC,A4,3C,32,AC,A4,FE,19.C0.3E,18, [3637] 
32,AC,A4,06,FF,07C2 

320 DATA 3A,90,B2,CD,4D,BC,C9,3A,C8,B1,FE, [3305] 
01,28,29,38,36,078C 

330 DATA 3A,A9,A4,FE,08,28,0B,7A,CD,9C,A4, [2983] 
57,7E,E6,0F,B2,07C3 

340 DATA 77,C9,CB,3A,CB,3A,CB,3A,CB,3A,7A, [2549] 
CD,9C,A4,E6,0F,08D0 

350 DATA 57,7E,E6,F0,B2,77,C9,7A,CB,3A,CB, [4337] 
3A,CB,3A,CB,3A,092B 

360 DATA B2,CD,9C,A4,77,C9,AF,CB,7A,28,02, [3024] 
3E,AA,CB,72,28.086A 

370 DATA 02,F6,55,CD,9C,A4, 77,CD,20,BC,AF , [2718] 
CB,6A,28,02,3E,07C6 

380 DATA AA,CB,62,28,02,F6,55,CD,9C,A4,77, [1989] 
C9,E5,2A,8F,B2,08E9 

390 DATA 4F,2F,A4,47,79,A5,BO,El,C9,80,F4, [2685] 
CO,03,02,28,00,0742 

400 DATA 00,00,00,44,44,40,40,AA,00,00,00, [3334] 
AA,EA,EA,A0,4E,051E 

410 DATA 8E,2E,40,A2,44 1 88,A0,4A,4B,AB,40, [3485] 
22,40,00,00,24,0510 

420 DATA 44,44,20,42,22,22,40,00,A4,AO,00, [3816] 
00,4E,40,00,00,0340 

430 DATA 00,02,24,00,OE,00,00,00,00,00,40, [2410] 
22,44,88,80,EA,02CC 

440 DATA AA,AA,EO,4C,44,44,40,E2,2E,88,EO, [3834] 

E2,26,22,E0,AA,0874 

450 DATA AE,22,20,E8,8E,22,EO,E8,8E,AA,EO, [2758] 
EA,24,88,80,EA,0968 

460 DATA AE,AA,EO,EA,AE,22,EO,00,04,00,40, [1066] 

00,04,04,48,02,0568 

470 DATA 48,42,00,00,EO.EO,00,08,42,48,00, [2602] 
C2,48,60,40,EA,05 70 

Listing KLEINSCR 


Bigbox 

Einige Grafik-Tricks gefällig? 

Das Tauschen von Bildschirmen oder das Füllen des 
Screens mit bestimmten Mustern wird in so manchem 
Programm benötigt. Eine kurze, aber wirkungsvolle Lö¬ 
sungsmöglichkeit bieten wir Ihnen mit Bigbox. 

Tippen Sie das Programm ein, und starten Sie es. Es erzeugt 
einen MC-File namens “BIGBOX.BIN“. Dieser kann jeder¬ 
zeit mit 

MEMORY &A4FF 

LOAD “BIGBOX.BIN“,&A500 

call &A500 

in eigene Programme eingebunden werden. 


480 DATA AA,A8,EO,EA,AE,AA,AO,CA,AC,AA,CO, [1836] 
E8,88,88,EO,CA,0B96 

490 DATA AA,AA.CO,E8,8C,88,EO,E8,8C,88,80, [2613] 
E8,8A.AA,EO,AA.0B12 

500 DATA AE,AA,AO,44,44,44,40,E2,22,2A,EO, [2440] 
AA,AC,AA,AO,88,083A 

510 DATA 88,88,EO,AE,EA,AA,AO,AA,EE,EA,AO, [1923] 
EA,AA,AA,EO,EA,OBFC 

520 DATA AE,88,80,EA,AA,AE,E1,EA,AE,CA,A0, [2668] 
E8,8E,22,E0,E4,0B37 

530 DATA 44,44,40,AA,AA,AA,EO,AA,AA,AA,40, [3318] 
AA.AA.EE,A0.AA.0970 

540 DATA A4,AA,AO,AA,A4,44,40,E2,24,88,EO, [1867] 

64,44,44,60,88,0802 

550 DATA 44,22,20,62,22,22,60,4E,44,44,40, [2487] 

00,00,00,OF,04,02B5 

560 DATA 20,00,00,00,E2,EA,EO,88,EA,AA,EO, [2257] 

00,E8,88,E0,22,083A 

570 DATA EA,AA,EO,00,EA,E8,EO,EA,8C,88,80, [3648] 
00,EA,AE,2E,88,09F2 

580 DATA EA,AA,AO,40,44,44,40,20,22,22,AE, [2595] 
88,AA,CA,AO,88,0772 

590 DATA 88,8A,40,00,AE,AA.AO,00,EA,AA,AO, [2492] 

00,EA,AA,EO,00,07F2 

600 DATA EA,AE,88,00,EA,AE,22,00,E8,88,80, [3020] 
00,E8,E2,E0,44,08B8 

610 DATA E4,44.40,00,AA,AA,EO,00,AA,AA,40, [2183] 

00,AA.AE,AO,00,0728 

620 DATA AA,4A,AO,00,AA,AE,2E,00,E2,48,EO, [2558] 
24,48,44,20,44,0638 

630 DATA 44,44,40,84,42,44,80,A4,00,00,00, [2636] 
A5,A5,A5,A5,00,058A 


10 'Initialisierungsprogramm fuer Kleinsch [4536] 
rlft (C) by G.Wimmel Software 

20 MEMORY &A2FF:LOAD"KLEINSCR.BIN" [811] 

30 CALL &A300:PRINT”Kleinschrift initialls [3228] 
iert !":END 

Listing KLEINSCR 


Es stehen dem Benutzer nun vier RSX-Befehle zur Verfü¬ 
gung, die gute Dienste verrichten. 

- IDOUBLE kopiert Block 3 (&COOO-&FFFF) nach Block 1 
(&4000-&7FFF), ermöglicht also ein Ablegen des Bild¬ 
schirmspeichers in Block 1. 

— ISHOWIT kehrt diesen Vorgang um, zeigt also, was sich 
so gerade in Block 1 befindet. 

— IEXEM tauscht beide Blöcke aus. 

- ICLEAN,x schließlich füllt den Bildschirm mit dem x ent¬ 
sprechenden Bitmuster. 

Die Besonderheit dabei ist, daß jeder Befehl seine Aufgabe in 
drei Schritten löst. Zuerst werden die Bytes &COOO, &C003 
... &FFFC bearbeitet, danach beginnt die Abarbeitung bei 
&C001 und so fort. Nach drei Durchgängen ist alles bis auf 
das Byte &FFFF fertig, für das eine Extrawurst gebraten 
werden muß. Durch diese Art, die Operationen auszuführen, 
ergeben sich hübsche Effekte — lassen Sie sich überraschen. 

(Alexander Stroh/jf) 


für 464-664-6128 




1000 

1010 





1030 

1 

• 

by Alexander Stroh -- 

1050 

• 

[CPC 464/664/6128] — 

1070 

1080 

1090 

MODE 

READ 

NEXT 

1:MEMORY &A4FF:FOR 1=0 TO 207 
mn$:POKE &A500+1,VAL("&"+mn$) 

1:SAVE"!bigboxmc",b,&A500,207 

1110 

1120 

DATA 

DATA 

01,09,A5,21,2D,A5,C3,D1,BC,17 

A5,C3,31,A5,C3,53,A5,C3,7A,A5 


[ 1287] 
[ 1087] 
[1305] 
[2185] 
[ 1287 ] 
[ 1279 ] 
[1287] 
[1768] 
[1926] 
[2223] 
[1611] 
[1393] 
[1251] 


Listing BIGBOX 


1130 

DATA 

1140 

DATA 

1150 

DATA 

1160 

DATA 

1170 

DATA 

1180 

DATA 

1190 

DATA 

1200 

DATA 

1210 

DATA 

1220 

DATA 

1230 

DATA 

1240 

DATA 

1250 

DATA 

1260 

DATA 

1270 

DATA 

1280 

DATA 

1290 

DATA 

1300 

DATA 

1310 

DATA 

Listing BIGBOX 


C3 , Al,A5,43,4C 
4F , 57,49,D4,44 
45,58,45,CD,00 
B 7,CO,06,03,4B 
CO,D5,E5,71,23 
C2,3 F,A5,El,Dl 
FF,FF,C9,B7,CO 
21,00,CO,D5,E5 
77,23,23,23,1B 
El,Dl,23,10,EA 
FF,C9,B7,C0,06 
00,CO,D5,E5, 7 E 
23,23,23,1B,7A, 
01,23,10.EA.3A, 
C9,B7,CO,06,03, 
CO,D5,E5,4E,CB, 
77,23,23,23,1B, 
El,Dl,23,10,E8, 
FF,7F , 77, 79,32, 


45,41 ,CE,53,48 
4F,55,42,4C,C5 
00,00,00,00,3 D 
11,55,15,21,00 
23,23,1B,7A,B3 
23,10,EF, 79,32 
06,03,11,55,15 
CB,BC,7E,CB,FC 
7A,B3,C2,5F,A5 
3A,FF, 7F , 32 , FF 
03,11,55,15,21 
CB,BC,77,CB,FC 
B3,C2,86,A5,El 
FF,FF.32,FF,7F 
11,55, 15,21,00 
BC,7E,71,CB,FC 
7A,B3,C2,AD,A5 
21 ,FF,FF,4E,3A 
FF,7F,C9.D5,C9 


[ 987] 

[ 1998] 
[1578] 
[ 1922 ] 
[1913] 
[875 ] 
[821 ] 
[2754] 
[2215] 
[1788] 
[1940] 
[1784] 
[2250] 
[ 1386 ] 
[ 1885 ] 
[1514 ] 
[1336] 
[1778] 
[1963] 
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[—Tips & Tricks 


Gewußt wo 

Such-Ergänzung zur Video¬ 
verwaltung aus Heft 6/89 

Im Zuge des immer größer werdenden Medienkonsums 
ist es nicht verwunderlich, daß die Anzahl der Videokas¬ 
setten in Haushalten, die über einen Videorekorder ver¬ 
fügen, ansteigt. Mit dem im Heft 6/89 veröffentlichten 
Verwaltungsprogramm für Videokassetten sind die an¬ 
wachsenden Filmbestände gut zu bewältigen. 

Als Ergänzung dazu bieten wir Ihnen nun ein Programm, das 
es ermöglicht, die von der Videoverwaltung angelegten Da¬ 
teien nach bestimmten Daten zu durchsuchen. 

Das Programm erlaubt: 

— Eingabe eines Stichwortes 

Beispiel: Gesucht wird der Film “Ein ausgekochtes Schlitz¬ 
ohr“. Sie geben ein: Schlitzohr+ 


Das + wird angehängt, wenn nachgeschaut werden soll, ob 
das Stichwort überhaupt im Titel enthalten ist. 

— Suche nach den Anfangsbuchstaben 

Beispiel: Gesucht wird der Film “James Bond jagt Dr. No“. 
Sie geben ein: James Bond* 

Das * wird angehängt, wenn nur die Anfangsbuchstaben mit 
dem Suchbegriff verglichen werden sollen. 

— Suche nach vollständigem Titel 

Hier wird der gesamte Titel ohne angehängtes Zeichen ein¬ 
gegeben. Rechtschreibfehler können nicht beachtet werden, 
man sollte also vorher den Suchbegriff überprüfen. Wenn 
man sich nicht genau an den Titel erinnert, ist es angebrach¬ 
ter, nach Stichwort oder Anfangsbuchstaben zu suchen. 

— Suche nach freien Kassetten 
Sie geben ein: frei 

Der Bildschirm wird gelöscht und die freien Kassetten wer¬ 
den wahlweise auf dem Drucker oder dem Bildschirm ausge¬ 
geben. 

Das Programm beachtet keine Groß- und Kleinschreibung! 
Eine problemlose Suche wird so ermöglicht und alle Besitzer 
von mehr als 50 Kassetten werden diese Zusatzfunktion 
schätzen. 

(Marc Roßkopf/jf) 


für 464-664-6128 
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20 ’ 
tung 
30 1 
40 1 
50 ' 
60 1 • 


[117] 

Titel Suchen: Utility f}r Videoverwal [2718] 


von Marc Ro~kopf 


70 ‘ 

80 ' deutschen Zeichensatz einbinden 
90 ' 

100 -- 


110 SYMBOL AFTER 91 

120 SYMBOL 91.&66,&18.8.3C,&66,&7E,&66,&66, 
8. 0 

130 SYMBOL 92,8.66 , &3C , 8.66,8.66 ,&66,8.66 ,&3C , 
8.0 

140 SYMBOL 93,8.66,8.44,8.66,8.66,8.66,8.66 , &3C , 
8.0 

150 SYMBOL 123,8.CC , 8.0,8.78,8.C , 8.7C , 8.CC , 8.76,8. 
0 

160 SYMBOL 124,8,66 , &0,8.3C , 8.66,8.66,8.66 ,&3C , 
8.0 

170 SYMBOL 125,8.66,8.0,8.66,8.66,8.66,8,66,8.3E , 
8.0 

180 SYMBOL 12 6,8.30,8.66,8.6 6,8.60,8.66,8.66,8.60 
,8.60 

190 KEY DEF 17,1,125,93 
200 KEY DEF 19,1,123,91 
210 KEY DEF 22,1,124,92 
220 KEY DEF 26,1,124,92,64 
230 KEY DEF 24,1,126,94,0 


240 

250 

260 


Datei einiesen 


270 SYMBOL 255,0,255,0,255,0,0,0,0 
280 0PEN0UT"D":MEMORY HIMEM-1:CLOSEOUT 
290 ' 

300 '"ACHTUNG: Die Variable 'maxcas' mu d 
enseiben Wert haben wie 'maxcas' im 
Hauptprogramm 

310 ' 

320 maxcas=150 
330 ' 

340 DIM VIDEO$(maxcas):1 ( 1 ) = 65 
350 OPENIN"Video.DAT":INPUT#9,fllmzahl:FOR 
n r=1 TO filmzahl :INPUT#9,video$(nr),ieer$ 
,leer$,leer$,leer$:NEXT nr:CLOSEIN 

Listing VIDEO 


[117] 

[1844] 
[117] 

[3588] 

[117] 

[1581] 
[117] 

[3588] 

[1213] 

[1766] 

[2304] 

[2113] 

[2642] 

[2094] 

[2278] 

[2404] 

[ 746] 

[ 1140] 
[1264] 
[ 765] 

[1480] 
[1750] 
[1093] 
[1750] 
[1790] 
[2548] 
[117] 

[8387] 


[117] 

[ 567] 
[117] 
[1750] 
[ 7589 ] 


360 


- [1828] 

370 ' Suchstring erfragen und auswerten [1767] 

380 - [1828] 

390 MODE 2:INK 0,0:INK 1,13:B0RDER 1 [3225] 

400 PRINT:PRINT" - Titel Suchen - [5903] 

-" : WINDOWJtO ,1,80,3,25 

410 ' [117] 

420 ' + anhtngen: Zeichenkette in String v [3763] 

orhanden oder nicht ? 

430 ' * anh{ngen: Anfangsbuchstaben suchen [1406] 

440 ' 

450 WHILE INKEY$<>"" :WEND [1786] 

460 LOCATE 15,4:PRINT STRING$(1(1LO [7209] 

CATE 2,4:LINE INPUT"Suchen nach: ",such$:s 
uch$=UPPER$(such$):IF such$="FREI" THEN GO 
TO 1070 

470 IF such$ = '"‘ OR LEN ( such$ ) > 1 ( 1) THEN CL [2143] 
S:GOTO 460 

480 abk=0 [179] 

490 IF INSTR(such$,"+")>0 THEN abk=1:such$ [3114] 

=LEFT$(such$,LEN(such$)-l) 

500 IF INSTR(such$,"*")>0 THEN abk=2:such$ [3799] 
=LEFT$(sucht,LEN(such$)-1) 

510 CLS f 911 

520 -- [2125] 


530 

540 


Suchen 


[357] 

[2125] 


550 FOR nr=l TO filmzahl [1143] 

560 LOCATE 2,2:PRINT" Ich suche: PRINT [2617] 

USING"###";nr 

570 IF video$(nr)=”frei" THEN GOTO 620 [2494] 

580 IF INSTR(video$(nr) ,"/'■) >0 THEN GOSUB [3108] 
680:GOTO 620 

590 IF abk=0 THEN IF UPPER$(video$(nr))=su [3389] 
ch$ THEN find$=video$(nr):GOSUB 860 

600 IF abk=l THEN IF INSTR(UPPERS(video$(n [5814] 
r)),such$)>0 THEN find$=video$(nr):GOSUB 8 
60 

610 IF abk=2 THEN IF LEFT$(UPPERS(video$(n [5174] 
r)),LEN(such$))=such$ THEN find$=video$(nr 
):GOSUB 860 f , 

620 NEXT . .. 

630 CLS:LOCAT E 3,2:PRI NT"Nichts gefunden. L446BJ 

;:PRINT CHR$(7);:FOR t=l TO 1000:NEXT:t=0 

640 GOTO 1040 

660 ' Suchen (wenn mehr als 1 Film auf Vid [1083] 

eo) 

670 -- 


680 op$=video$(nr):x-0:nu=0 
Listing VIDEO _ 


[2125] 

[1581] 
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Tips & Tricks—| 


690 FOR c=l TO LEN(op$) [2019] 

700 IF MID$(UPPER$(op$),c,1)="/" THEN nu=n [3889] 
u+1:zahl(nu)=c 

710 NEXT [350] 

720 nu=nu+l:zahl(nu)=LEN(op$)+3 [2034] 

730 film$(l) = LEFT$(op$,zahl(1) — 2) [1701] 

740 FOR x=2 TO nu [710] 

750 film$(x)=MI0$(op$,zahl(x-1)+2,zahl(x)- [3918] 

zahl(x- 1 )-3) 

760 NEXT [350] 

770 FOR x=l TO nu [792] 


780 IF abk = 0 THEN IF suc h$ = UPPER$ ( fi 1m$ ( x ) [2589] 

) THEN n=x:f1nd$=f11m$(x):GOSUB 860 
790 IF abk=1 THEN IF I NSTR ( UPPER$ (fi1m$(x) [4050] 
) ,suc h$)> 0 THEN n = x:f1nd$ = f1lm$(x):GOSUB 8 
60 

800 IF abk=2 THEN IF LEFT$(UPPERS(fi1m$(x) [5620] 
),LEN(such$))=such$ THEN n=x:f1nd$=fi1m$(x 


):GOSUB 860 

810 NEXT [350] 

820 RETURN [555] 

830 '- [2125] 

840 ' Gefunden ! [1257] 

850 '- [2125] 


860 CLS 

870 PRINT CHR$(7) 

880 IF n=0 THEN n=l 

890 LOCATE 1,3:PRINT" Folgender Film wurde 
gefunden: LOCATE 1,5 

900 PRINT:PRINT" Video ";:PRINT USING"###" 
;n r; :PRINT": " + video$(nr) 

910 a=INSTR(v1deo$(nr),find$) 

920 1 

930 ' Film mit Kasten umgeben: 

940 1 

950 LOCATE 12+a,5:PRINT CHR$(150);:PRINT S 
TRING$(LEN(f1nd$),CHR$(154));:PRINT CHR$(1 
56) 

960 LOCATE 12+a,6:PRINT CHR$(149):LOCATE 1 
3+a+LEN(find$),6:PRINT CHR$(149) 

970 LOCATE 12+a,7:PRINT CHR$(147);:PRINT S 
TRING$(LEN(f1nd$),CHR$(154));:PRINT CHR$(1 
53) 

980 ' 

990 IF abk > 0 THEN LOCATE 1,22:PRINT" Weit 
ersuchen ? (J/N)":LOCATE 1,1 ELSE LOCATE 

1,22:PRINT" -> Taste":LOCATE 1,1:CALL &BB 
18:GOTO 1040 

1000 a$=UPPER$(INKEY$):IF a$="" THEN 1000 
1010 IF a$="J" THEN CLS:RETURN 
1020 IF a$="N" THEN PRINT:GOTO 1040 
1030 PRINT CHR$(7);:GOTO 1000 
1040 abk=0:nr=0:GOTO 390 

1050 ’- 

1060 ' freie Kassetten suchen 

1070 *- 

1080 CLS:PRINT:PRINT" Sollen die freien Ka 
ssetten auf dem Drucker ausgegeben werden 
? (J/N)" 

1090 a$=UPPER$(INKEY$):IF a$="" THEN 1090 
1100 IF a$="J" THEN ausgang=8:PRINT#8,CHR$ 
(27)+"A"+CHR$(6);:GOTO 1130 
1110 IF a$="N" THEN ausgang=0:GOTO 1130 
1120 LOCATE 1,1:PRINT CHR$(7);:GOTO 1090 
1130 CLS:PRINT:PRINT#ausgang, Folgende Ka 
ssetten sind als frei gekennzeichnet: ":PR 
INTftausgang: PRINTttausgang : WINDOWFO ,1,80,7, 
2 5:PRINT" "; 

1140 FOR nr=l TO filmzahl STEP 13:c=2 
1150 FOR x = 0 TO 12: IF nr + x>filmzahl THEN G 
OTO 1220 

1160 IF video$(nr+x)="frei" THEN PRINTOaus 
gang,USING"###";nr+x;:PRINTüausgang," "; 

ELSE c=0:GOTO 1180 

1170 IF (nr+x)/117=INT((nr+x)/117) AND aus 
gang=0 THEN CALL &BB18:CLS:c=1 
1180 NEXT 

1190 IF c=2 AND ausgang=0 THEN PRINT:PRINT 
:PRINT“ ELSE IF c=0 AND ausgang=0 THEN 
GOTO 1210 ELSE PRINT" ";:c=2 
1200 IF ausgang=8 THEN PRINT#8:PRINT#8 
1210 NEXT 

1220 IF ausgang=0 THEN c=0:PRINT:PRINT:PRI 
NT" -> Taste":CALL &BB18:GOTO 390 ELSE PR 
INT # 8:GOTO 390 
1230 ' 

1240 ' Ende 
1250 ' 

Listing VIDEO 


[91] 

[ 1045 ] 
[ 794] 
[4802] 

[ 5436 ] 

[ 1406 ] 
[117] 

: 1525 ] 
[117] 

[4487] 


[3170] 

[4140] 

[117] 
[8565 ] 


[1600] 

[1501] 

[2312 ] 

[1548] 

[ 687] 

[1785] 

[2063] 

[1785] 

[7057] 


[ 1782] 
[3688] 

[2027] 
[ 1502] 
[9309] 


[2008] 

[2772] 

[5880] 


[5477] 

[350] 

[5974] 


[2987] 

[350] 

[5733] 


[117] 

[715] 

[117] 


R. Schuster Computer 

Computer-Hard - und Software 


Spiele für CPC 


1943 

4x4 Off Road Racing 

Afterburnei 

Arcade Muscle 

Area dp Power 

Arkanoid2 

Artura 

Blast oroids 

Buffalo Bills W W 

Rodeo Games 

California Games • 

Chicago 30 

Chuck Yeagers 

Advanced Flight T 

Crazy Cars 2 

Cybernoid 2 

D,T. OlympicChallenge 

Das Reich 

Dogfight2187 

Dominator 

Dragon Ninja. 

Dschungelbuch 

Echelon 

Emlyn Hughes Soccer 
Expansion Kit f. 

Football Manager 2 
Forgotten Worlds 
Galactic Conqueror 
Gary Linekers 
Super Skills 
Gary Linekers 
Superstar Soccer 
Hate 

Hereos of the Lance 

Indiana Jones 

T. Last Cruscade 

Jagd auf Roter Oktober 

Last Duell 

Last Ninja 2 

Leben und sterben 

lassen 

Led Storm 

Microprose Soccer 

New Zealand Story 

Night Raider 

Out Run 

Pacland 

Pacmania 

Pink Panther 

Pirates 6128 

Purple Saturn Day 

R-Type 

Raffles 

Red Heat 

Rick Dangerous 

Roadblasters 

RunTheGauntlet 

Runnmg Man 

Savage 

Silkworm 

Skweek 

Soccer Spectacular 

Soccer Squ ad 

Spitting Image 

Superman 

Superski 

Supertrux 

Technocop 

The Real Ghostbusters 

Thunderbirds 

Thunderblade 

Tiger Road 

Times of Lore 

Timescanner 

Titan 

Turbo Cup 

Vigilante 

Vindicator 

Vindicators 

Wanderer 

War in Middle Earth 

Wec Le Mans 

Winter Edition 

Xybots 


Cass. 

26.90 

29.90 

39.90 

39.90 

28.90 

31.90 

29.90 

29.90 

26.90 
26.90 


26.90 

31.90 


31.90 

29.90 

39.90 

26.90 

22.90 

26.90 
26.90 


Disk. 

45.90 

44.90 

49.90 

49.90 

44.90 

44.90 

45.90 

45.90 

37.90 

41.90 

43.90 

41.90 

45.90 

47.90 

45.90 

39.90 

47.90 

44.90 

39.90 

43.90 

43.90 

29.90 

43.90 

41.90 


29.90 45.90 


29.90 

26.90 

28.90 

41.90 

29.90 

39.90 


26.90 

43.90 

31.90 

29.90 

26.90 

29.90 

31.90 

28.90 

28.90 

29.90 

28.90 


26.90 

31.90 


43.90 

44.90 

41.90 

43.90 

54.90 

45.90 

43.90 

26.90 

44.90 

59.90 

47.90 

44.90 

41.90 

45.90 

43.90 

57.90 

43.90 

45.90 

39.90 

47.90 

47.90 

39.90 

44.90 

45.90 


Game, Set & Match II 

Super Hang on. Davis' Snooker, Basket Master 
Suporbal). Track & Fielci, Matnhtlay [| Cham 
pionchip Sprint 

Kassette 39.90 Diskette 54.90 

Karate ACE 

W.jy o( the Tiger, Samurai Tiilogio. Bruce Lee 
Kung Fu Master F.xplodin« Fist, Avenger. Uch: 
Mata 

Kassette 39.90 Diskette 43.90 

Six-Pack 3 

Ghost'n Goblms, i.ivmg Daylights. Escape from 
Singes Castle (nicht aul Disc), Dragons Lair, 
Paperboy, Enduro Raccr 
Kassette 28.90 Diskette 42.90 

Top Ten Collection 

Snboteui I, Saboteur II. Sygma III, Critmal Mass 
Airwoll, Deep Strüte, Combat Lyrrx, Turbo 
Esprit Thanatos Bombjack II 

Kassette 31.90 Diskette 47.90 

Supreme Challenge 

Elite, Sentinel, Starglider ACE 11, Tetns 
Kassette. 39.90 Diskette 49.90 

Giants 

California Games, Gaumtet II. Out Run, Rolling 
Thunder, 720’ 

Kassette 35.90 

Ten Mega Games 

North Star. Cybernoid. Deflector, Trailblazei, 
Bloodbrolhet. MASK II. Tour de Force, Hercu¬ 
les, Masters ot the Universe, Blood Valley 
Kassette 29.90 Diskette 43.90 

Par 3 

Leaderboard. Leaderboard Tourrrement, 
Worldclass Leaderboard Ulskette 51.90 

Ten Great Games III 

10th Frame. Firelord, Ranarama, Fighter Pilot 
Leaderbourd, Iridis Alpha. Eagles. Rebounder, 
Alley Cat, Last Mission 

Kassette 39.90 Diskette 43.90 

Flight ACE 

Advanced Tactical Fighter, Tomahawk. Stnke 
Force Harrier, Spcedfire -10 ACE. Airtralfic, 
Combat 

Kassette 45.90 Diskette 57.90 

Space ACE 

Xevius, Venon Slrikes Back. Cybornoid, North 

Star. Zynaps. Trantoi. Exolon 

Kassette 39.90 Diskette 43.90 

EPYX 

World Games, Winter Garnes. Impossible Mis¬ 
sion Supercycle 

Kassette 26.90 Diskette 51.90 


28.90 

43.90 


29.90 

29.90 

39.90 

45.90 

KUNSTLEDER-HAUBEN 

*• * ■ JU 

59.90 

CPC 464/664 . 

19.80 

29.90 

45.90 

CPC 6128 . 

19.80 

28.90 

39.90 

Monitor GT 64/65 . 

27.90 

29.90 


Monitor CTM 640/644 . 

29.95 

28.90 

39.90 

EuroPC Tastatur . 

21.80 

28.90 

40.90 

EuroPC Monitor MM 12 

34.90 

29.90 

45.90 

EuroPC Monitor CM 14. 

37.90 

29.90 

39.90 

26.90 

44.90 

45.90 

41.90 

EuroPC Tastatur u MM 12 . 

EuroPC Tastatur u CM 14 . 

PC 1512/1640 Tastatur . 

49.80 

55.80 

19.80 

26.90 

29.90 

31.90 

26.90 

41.90 

45.90 

44.90 

41.90 

Schneider PC 2640 Tastatur . ... 

no name MF Tastatur . 

PC 1512/1640 eintlg.komplett ,, 
PC 1512/1640 zweitlg. Set .. 

19.80 

19.80 

49.80 

59.80 

26.90 

42.90 

41.90 

DMP 2000/2160/3000/3160 . 

Star NI./ND/NR 10. 

19.80 

24.90 

26.90 


Star LC 10 . 

24.90 

26.90 

28.90 

29.90 
29.90 
2 R on 

41.90 



39.90 

CPC-ZUBEHÖR 

44.90 

an 

Kabel CPC/an Fernseher 
m. Scart . 

19.80 


28.90 39.90 


DMP 2160 

298: 


Epson-kompatible 
160 Z/Sec. nu 


Bildschirmfilter GT 64/65 . 34.90 

Bildschirmfüter CTM 640/644 39.80 

Druckerkabol 464/664 . 29.80 

Druckerkabel 6128 . 29.80 

Monitor Verlängerung CPC 464 27.90 

Monitorverlängerung 

CPC 664/6128 . 34.90 

Kabel Computer/Recorder .. 19.80 

3"-Disketten, lOStck. 69.00 


Hatdwure auf Anfrage 

lulümor und Preisandoiungen Vorbehalten Bestellungen schriftlich oder telefonisch. 

R. Schuster Computer 

Obere Münsterstr. 33-35 Tel. (0 23 05) 3770 4620 Castrop-Rauxel 

Bei allen Bestellungen unbedingt Computertyp angoben 

Geschäftszeiten: Montag Freitag 9.00-13.00 und 14 00-16.00 Uhr, Samstag ä 00 13.00 Uhi 
Versand nur pei NNzuzugI.8,00 DM Veisandkosten odei Vorltasseauf Postguo-Kto Nr. 6947.2-460 
rostgiroamt Dortmund zuzüglich 6.00 DM Ausland um per Vorkasse zuzugl 12 00 DM 
Neueste kompl. Softwarelisto bei jeder Bestellung kostenlos oder gegen frankierten Riickumschlag. 
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I—Tips & Tricks 


Nichts ist unmöglich 

Berechnete Sprünge 
unter BASIC 

Haben Sie schon einmal versucht, einen GOTO-Befehl 
auszuführen, der abhängig von dem Wert einer Varia¬ 
blen war? Ja, dann wissen Sie auch, daß dies zu einer 
Fehlermeldung führt. Daß es auch anders geht, soll Ih¬ 
nen dieses Programm zeigen. 

Die drei Befehle der ersten Gruppe ermöglichen berechnete 
Programmsprünge und ein berechnetes Setzen des DATA- 
Zeigers. Das bedeutet: Die Zeilennummer wird in einer Va¬ 
riablen angegeben, was bei den Befehlen des eingebauten 
BASICs nicht möglich ist. Ausdrücke wie IGOTO. 10*w + 1 
sind also keine Utopie mehr. 

IGOTO.zeilennummer 

Springt zur Zeile mit der Nummer zeilennummer. Da bei 
CALL- und RSX-Befehlen auch arithmetische Ausdrücke als 
Parameter angegeben werden dürfen, wird eine direkte Be¬ 
rechnung des Sprungziels möglich. 

Beispiel: IGOTO,5*(10-x)+23 IGOSUB,zeilennummer 
Wirkt wie das normale GOSUB, allerdings kann das Sprung¬ 
ziel wieder als arithmetischer Ausdruck oder Variable ange¬ 
geben werden. 

Beispiel: IGOSUB,a*10-4 IRESTORE.zeilennummer 
Wie das normale RESTORE, aber wieder mit der Möglich¬ 
keit, die Zeilennummer als Variable etc. anzugeben. Bei¬ 
spiel: IRESTORE,z 

Weitere Befehle 

Nun folgen zwei Befehle für den Umgang mit dem Disketten¬ 
laufwerk. Diese Befehle funktionieren sowohl unter AMS- 
DOS, als auch unter VDOS. Zu beachten ist, daß im aktuel¬ 
len Laufwerk auch wirklich eine Diskette eingelegt ist, weil 
bei Ausführung dieser Kommandos zwischenzeitlich die 
Textausgabe abgeschaltet wird und dadurch eine eventuell 
ausgegebene Fehlermeldung nicht sichtbar wird. Wenn der 
Computer längere Zeit nichts mehr von sich “hören“ läßt, 
sollten Sie einmal “C“ für “Cancel“ (im VDOS: “N“ für 
“Nein“) drücken. 

IDlSKSPACE,@sp% 

Dieser Befehl ermittelt die freie Speicherkapazität der Dis¬ 
kette im aktuellen Laufwerk. Sie wird in der Variablen sp% 
in Kilobytes zurückgegeben. 

Beispiel: sp%=0:IDISKSPACE,@sp%:?sp% IEXIST,@f$, 
@flag% 

Dieser Befehl testet, ob eine Datei existiert oder nicht, und 
beugt damit der Fehlermeldung “ < name> not found“ bzw. 
“ < name > already exists“ vor. 

Enthält flag% nach Abschluß des Befehls den Wert -1, so ist 
die Datei vorhanden, andernfalls enthält flag% eine 0. 

Beispiel: 

10 INPUT"Dateiname“;f$ 

20 flag#=0: lEXIST,@f'$,@flag%: IF NOT flag* THEN 10 

Der INPUT-Befehl des BASIC-Interpreters ist zwar sehr 
komfortabel, aber er hat auch seine Nachteile. So ist es z.B. 
nicht möglich, die maximale Zahl von Zeichen, die ange¬ 
nommen werden sollen, festzulegen. Auch, wenn nur Zahlen 
als Eingabe erlaubt sein sollen, hilft nur eine eigene Routine. 
Mit dem IINPUT-Befehl von UNIVERSAL RSX ist dieser 
Aufwand nun nicht mehr nötig. 


IINPUT,@s$.AMin, AMax,ZMax,@flag% 

Dieser Befehl erlaubt die formatierte Eingabe über die Tasta¬ 
tur. Nach Abschluß des Befehls enthält s$ den eingegebenen 
Text. Das letzte eingegebene Zeichen kann mit DEL gelöscht 
werden. Es können nur ZMax Zeichen eingegeben werden. 
Es werden nur Zeichen angenommen, deren ASCII-Wert im 
Bereich von AMin (einschließlich) bis AMax (ausschließ¬ 
lich) liegt. ESC, DEL und RETURN/ENTER werden unab¬ 
hängig von dem mit AMin und AMax gewählten Bereich ab¬ 
gefragt. Der Befehl kann mit ESC abgebrochen werden. Der 
alte Inhalt von s$ bleibt dann erhalten und flag% enthält eine 
0. Andernfalls enthält flag% den Wert -1. Wichtig ist, daß s$ 
vorher mit ZMax Zeichen gefüllt wird. 

Beispiel: f% =0:zm=2:s$ = SPACE$(zm): llNPUT,@s$, 
48,58,zm,@f% 

Es können nur Zahlen eingegeben werden, und zwar nur 
Werte von 0 bis 99 (2 Stellen). 

Beim letzten Befehl handelt es sich um einen sog. “Entschüt- 
zer“, der es ermöglicht, mit der “P“-Option gespeicherte 
Programme wieder normal zu bearbeiten. Der Befehl funk¬ 
tioniert auch unter VDOS. 

IDEPROTECT,flag 

Enthält flag beim Aufruf einen Wert ungleich 0, so wird ein 
kleiner Patch ins RAM kopiert, der nach jeder Diskettenope¬ 
ration das Protect-Flag des BASIC-Interpreters löscht. Da¬ 
mit lassen sich auch geschützte Programme wieder LISTen. 
Hat flag den Wert 0, dann wird der Patch rückgängig ge¬ 
macht. Geschützte Programme bleiben dann wieder ge¬ 
schützt. 

Fehlermeldungen: Als Parameter dürfen nur Integervaria¬ 
blen oder Strings bzw. deren Adressen angegeben werden. 
Bei REAL-Parametern gibt der BASIC-Interpreter eine Feh¬ 
lermeldung aus. UNIVERSAL RSX selbst kennt zwei Feh¬ 
lermeldungen: Bei unstimmiger Parameterzahl wird die Mel¬ 
dung “Parameterfehlerl“ ausgegeben. Bei den Befehlen 
IGOTO, IGOSUB und IRESTORE ist auch die Fehlermel¬ 
dung “Falsche Zeilennummerl“ möglich, wenn eine nicht 
existierende Zeilennummer angegeben wird. 

Der Entschützer funktioniert grundsätzlich nur mit einem 
Diskettenlaufwerk. Für ihn wird vorausgesetzt, daß die 
Diskroutinen über die Adresse &BE7F zum aufrufenden 
Programm zurückkehren. 

Das Abtippen: Geben Sie den DATA-Lader UNIV- 
RSX.LAD ein und speichern Sie ihn vor dem Start. Nach 
dem Start mit RUN wird der Maschinencode eingelesen und 
als Datei UNIV-RSX.BIN abgespeichert. Mit der Befehls¬ 
folge 

MEMORY &A2FF: L0AD"UNIV-RSX.BIN%&A300:CALL &A300 

werden die RSX-Befehle später wieder aktiviert. 

(Harald Schoen/cd) 


für 6128 

I 

10 '*#*#********************************** [1669] 
* * * 

20 '* A:UNIV-RSX.LAD - DATA-Lader von 'CPC [1405] 
* 

30 '***#****#***************************** [1669] 

**# 

40 * t117] 

50 DATA A300,3E,C9,32,00,A3,21,0E.A3,2AE [1211] 
60 DATA A308,01,12,A3,C3,Dl,BC,00,00,306 [1749] 

70 DATA A310.00,00,29,A3,C3.56,A3,C3,348 [1604] 

80 DATA A318,64,A3.03,91,A3,C3.9F,A3,503 [2025] 

Listing UNIRSX_ 
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Tips & Tricks—i 


90 DATA 
100 DATA 
110 DATA 
120 DATA 
130 DATA 
140 DATA 
150 OATA 
160 DATA 
170 DATA 
180 DATA 
190 DATA 
200 DATA 
210 DATA 
220 DATA 
230 DATA 
240 DATA 
250 DATA 
260 DATA 
270 DATA 
280 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 


A320.C3, 
A32 8,A4 
A330,55 
A338,C5 
A340,43 
A348,4 E 
A35 0,4F 
A358,9C 
A360,22 
A368.CD 
A3 70,00 
A3 78,00 
A380,A4 
A3 8 8,36 
A3 9 0,C9 
A3 9 8,D2 
A3AO,C2 
A3A8,EO 
A3B0,00 
A3B8,3 D 
A3C0,03 
A3C8,23 
A3 DO,B8 
A3 D8,CD 
A3 EO,DA 
A3 E8,05 
A3 FO,DD 
A3F8,A4 
A 400,D2 
A408,6E 
A410,DD 
A418.il 
A420,C9 
A4 2 8,BB 
A430,2F 
A 4 38,BB 
A440,El 


88,A3, 

, 47,4F 
,C2,52 
,44,49 
,C5,4 5 
,50,55 
,54,45 
,A4,CO 
, 58 , AE 
, 91 ,A4 
,B9,3E 
, 23,ED 
, ED,5B 
, 06,CD 
, 3D.C2 
, A8,A4 
,9C,A4 
, A4,CD 
,CD,54 
, 3D,C2 
,DD,6E 
,56,21 
.CD,77 
,54,BB 
,8C,A4 
,C2,9C 
, 5E,04 
,CD,21 
,8C,A4 
,08,DD 
,El,DD 
, E 3 , A 4 
,CD,81 
, FE,OD 
, FE,7F 
,30,28 
,28,20 


C3,E 7, 

,54,CF 
,45,53 
,53,4B 
,58,49 
,D4,44 
,43,D4 
,91,A4 
,C9,3D 
,D2,A8 
, 06,CD 
, 5B, 58 
, ID,AE 
, 03,B9 
, 9C,A4 
,22,17 
, D5,CD 
,D4,BC 
,BB,El 
,9C,A4 
, 02,7E 
,00,CO 
,BC,F5 
, Fl , El 
, 13,C3 
, A4,05 
,DD,56 
.A4,El 
, 1B,CD 
,66,09 
,6E,00 
,06,00 
,BB,OE 
, 28,2F 
,28,16 
,E5,67 
, CD,5 A 


A3,C3, 

, 47,4F 
.54,4F 
,53,50 
,53,D4 
,45,50 
,00,30 
,D2,A8 
,C2,9C 
,A4,E5 
,72,F6 
,AE,CD 
,CO,8C 
. El , 18 
, CD,91 
.AE,C9 
,5 7,BB 
,AF,CD 
,C3,SC 
.D5,DD 
, 47,23 
, EB,CD 
,CD, 7 D 
. 1 1 ,FF 
,8C,A4 
,DD,46 
.06,21 
,11,00 
,8C,A4 
,71,23 
,DD,66 
,EB.ED 
,00,CD 
, FE , FC 
,BA,38 
,79,B8 
,BB,77 


6C,59A 
,53,346 
,52,2F6 
,41,2D4 
,49.35 E 
,52,2F2 
,C2,2FE 
, A4,560 
,A4,430 
,CD,5D2 
,36,368 
,8C,3CA 
,A4,4B4 
, DO,3 8 E 
,A4,50A 
, 3D,40B 
, 21,4 D 7 
, 1B,578 
,A4,4B0 
,66,494 
,5E,296 
,57,369 
,BC,5B6 
,FF,5BD 
, FE, 50E 
,02,401 
, E3,37C 
,00,328 
,DD,4F 7 
,E5,3 3 B 
,01,4 4 D 
, BO,426 
,06,3B3 
,28,4 3 F 
, 2B,307 
, 7 C,40C 
,23,3A5 


[2393] 
[1352] 
[1665] 
[ 2302 ] 
[1713] 
[871] 
[2563] 
[ 2691 ] 
[2171] 
[1997] 
[1623] 
[2303] 
[1906] 
[ 1002 ] 
[2364] 
[1772] 
[2437] 
[2950] 
[1495] 
[1507] 
[1009 ] 
[1554] 
[ 2011 ] 
[1643] 
[2356] 
[ 1291 ] 
[ 1385 ] 
[2318] 
[1525] 
[2524] 
[2094] 
[ 1464] 
[2727] 
[ 1394 ] 
[1316] 
[1384] 
[1894] 


Llsting UNIRSX 


460 DATA A448,OC,18,DB,79,B7,28,14,2B,296 
470 DATA A450,OD,3E,08,CD,5A,BB,87,CD, 389 
480 DATA A458,5A,BB,18,CA,37,C3,84,BB,430 
490 DATA A460,B7, 18 , FA , F5,3E,07,CD,5A,42A 
500 DATA A46B,BB,Fl,18,BA,3D,20,2D,7B,383 
510 DATA A470,B7,20,06,3E,C9,32,7F,BE,353 
520 DATA A4 78,C9,21,85,A4, 11, 7F,BE,01,362 
530 DATA A480,07,00,ED,BO,C9,F5,AF,32,443 
540 DATA A488,2C,AE,Fl,C9,73,23,72,23,3BF 
550 DATA A490,C9,CD,00,B9,CD,63,E8,CD,534 
560 DATA A498,03,B9,2B,C9,21,AD,A4,7E,3A0 
570 DATA A4A0,B7,C8,CD,5A,BB,23,18,F7,493 
580 DATA A4A8,21,C4,A4,18,F2,OD,OA,50,2FA 
590 DATA A4B0,61,72,61,60,65,74,65,72,351 
600 DATA A4B8,66,65,68.6C,65,72,21,OD,2A4 
610 DATA A4C0,OA,OD,OA,00,OD,OA,46,61,ODF 
620 DATA A4C8,6C,73,63,68,65,20,5A,65,2EE 
630 DATA A4D0,69,6C,65,6E,6E,75,60,6D,365 
640 OATA A4D8,65,72,21,0D,0A,0D,0A,00,126 
650 DATA A4E0,44,49,02,00,00,00,00,00,15F 
660 DATA »ENDE* 

670 adr=&A300:zei1e=50:MEMORY adr-1 
680 READ d$:IF d$="*ENDE*"THEN 780 


750 READ pr$:pr2=VAL(" & " + p r$ ):IF pr 
N pr2=pr2+65536 

760 IF pr < > pr2 THEN PRI NT"Pruefsumm 

r in Zei1e";zei1e:STOP 

770 zei1e=zei1e+10:GOTO 680 

780 SAVE"UNIV-RSX.BIN",B,&A300,&1E3 

790 PRINT d$:END 

Listing UNIRSX 


2 < 0 THE 
enfehle 


[ 1818] 
[969] 

[ 1462] 
[ 1473 ] 
[2161] 
[ 1079] 
[2511] 
[ 1921 ] 
[1162 ] 
[ 1661 ] 
[1608] 
[ 1528 ] 
[1471] 
[1460] 
[ 1905 ] 
[2159] 
[1593] 
[1464] 
[1925] 
[1313] 
[ 502] 

[ 1996] 

[1164] 

[117] 

[462] 

[883] 

[717] 

[318] 

[ 375 ] 

[2610] 

[3615] 

[2032] 
[ 766] 
[346] 


Synthetronic Computer Discount 

( Handelsanf ragen Milt können, bitte Bit Nachweis ) 

Disketten, 10 Stk. 

Drucker 

3“ CF-2 

DH 49,90 

Star LC-10 DH 399,- 

3’ CF-2, Haie11 

DM 59,90 

Star LC-24/10 DH 649,- 

3.5* HF-2DD 

DH 14,90 

Aistrad DHP 2160 DH 449,- 

3.5* HF-2D ’3H' 

DH 27,40 

Aiistrad DHP 3160 DH 499,- 

5.25* MD-2D 

DH 4,90 

Aiistrad DHP 4000 DH 749,- 

5.25" MD-2D Nashua DH 14,90 

Aiistrad LQ 3500 DH 769,- 

Festplatten Joyce/PCW Aistrad LQ 5000 1199,- 

Vortex, 20 HB 

DH 998,- 

Citizen Swift 24 DH 848,- 

Vortex, 30 HB 

DM1198,- 

Amstrad PCs 

Vortex, 40 HB 

DM1398,- 

PCI 640/Mono, 20 HB DM 1899.- 

Vortex, 60 HB 

DH1798,- 

PCI 640/Mono, 40 HB DM2199,- 

Festplatten 

1640/1512 PC2086/Hono, 30 HB DM2599,- 

Set 20 HB + Contr 

DM 549,- 

PC2286/Hono, 40 HB DM3498,- 

Set 40 HB + Contr 

DM 699,- 

PC2386/Hono, 64 HB DM5998,- 

Vortex Supercards 

Amstrad CPCs 

20 HB 

DH 599,- 

CPC 464 + Mono !! DH 199,- 

30 HB 

DH 699,- 

CPC 464 ♦ Color 1 DH 399,- 

40 HB 

DH 999,- 

386 SX 

60 HB 

DM1395,- 

386X/VGA, 16 MHz DH2498,- 

Software 


386X/HGC, 20HB DM2995,- 

tocoFont f. PC¥ 

DH 85,- 

486 / 33 MHz 

LocoHai1 2 f. PCW 

DH 199,- 

SD486 S / HD DH 18795,- 

Dfi Graph f. PCW 

DH 179,- 

SD486 plus DH 27699,- 

DR Draw f. PC« 

DH 179,- 

mt Ganzseltenbildschirra 1 

dBase IV f. PCs 

DM1589,- 

vorauss. lief erb. 12/89 

Beste)1annahae : 

069 / 73 

70 5 1 - Versand per NN. 

Synthetronic Developnent Conputerentwicklungs-, Handels- 

und Betei 1igungsgeselIschaft nbH, 6000 Frankfurt 
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i—Tips & Tricks 


Threed 

3D-Te\t-Ausgabe einmal anders 

Lieben Sie Grafikspielereien? Dann sollten Sie die klei¬ 
ne, etwas extravagante Textausgabe nicht verpassen, es 
lohnt sich. 


Das Ganze besteht aus zwei Teilen, der erste Teil (Part 1) ist 
der Dalalader. Dieser sollte vor dem Starten erst einmal ab¬ 
gespeichert werden, zum Beispiel unter “Threed.bas". Wur¬ 
de alles richtig abgetippt, wird ein Binärprogramm 
“Threedmc.bin“ abgespeichert. Dieses kann unter BASIC 
wie folgt eingeladen werden. 

Memory &A3FF: LOAD“Threedtne.bin“,&A400: CALL &A500 

Der zweite Teil (Part 2) ist ein Demonstrationsprogramm, 
das eine eindrucksvolle Vorführung gibt. Diese sollten Sie 
unter “Threed.dem“ abspeichern. 

Möglichkeiten und Anwendung 

Das Programm stellt einen RSX-Befehl zur Verfügung, der 
durch verschiedene Parameter angesteuert werden kann. 

Die besten Ergebnisse werden in MODE 0 und MODE 1 er¬ 
zielt, wobei MODE 1 am besten aussieht. 

Der Syntax lautet: 

ITHREED,x,y,w,g 

Hierbei ist zu beachten, daß das Wort, welches in 3D-Buch- 
staben ausgegeben werden soll, auf dem Bildschirm in der 



für 464-664-6128 


1000 '- 

1010 '-THREED- 

1020 '— Part 1 CODES -- 

1030 '- 24.08.1988 - 

1040 ‘— by Alexander Stroh — 

1050 -- 

1060 [CPC 464/664/6128] -- 


1070 *- 

1080 MODE 1:MEMORY &A3 FF:FOR 1=0 TO 389 
1090 READ mn$:POKE &A400+1 ,VAL("&"+mn$) 
1100 NEXT 1 :SAVE"!threedme",b,&A400,390 

1110 -- 

1120 DATA 01,OF,A4,21,1B,A4,CD,Dl.BC.3E 
1130 DATA C9,32,00,A4,C9,14,A4,C3,34,A4 
1140 DATA 54,48,52,45,45,04,00,00,00,00 
1150 DATA 00,00,00,00,00,00,00,00,00,00 
1160 DATA 00,00.00,00,00,00,00,00,00,00 
1170 DATA 00,00,FE,04,CO,7B,FE,01,CA,40 
1180 DATA A4,FE,02,CO,32,33,A4,DD,6E,04 
1190 DATA DD,66,05,22,21,A4,DD,6E,06,DD 
1200 DATA 66,07,22,1F,A4,DD,7E,02,87,87 
1210 DATA 87,87,06,04,CB,3F,32,23,A4,3E 
1220 DATA 01,32,24.A4,3A,24,A4,87,47,3E 
1230 DATA 10,90.32,25,A4,47,3A,33,A4,FE 
1240 DATA 01,78,CA,7E,A4,87,87,6F,97,67 
1250 DATA 22,26,A4,32,28,A4,3A,28,A4,87 
1260 DATA 32,29,A4,5F, 16,00,3A,25,A4,6F 
1270 DATA 62,CD,F0,BB,B7,CA,69,A5,97,32 
1280 DATA 2A,A4,3A,29,A4,5F,16,00,62,6B 
1290 DATA 19,19,22,2D,A4,3A,2A,A4,87,6F 
1300 DATA 26,00,ED,5B,1F,A4,19,ED,5B,2D 
1310 DATA A4,19,ED,5B,26,A4,19,22,2B,A4 
1320 DATA 2A,21,A4,19,22,2D,A4,ED,5B,2B 
1330 DATA A4,CD,CO,BB,3E,02,CD,DE,BB,11 
1340 DATA 00,00,21,0A,00,3A,33,A4,FE,01 
1350 DATA CA,EA,A4,29,CD,F9,BB,3E,03,CD 



[1287] 

[910] 

[ 762] 
[1533] 

[2185] 

[1287] 

[ 1279 ] 
[1287] 
[2391] 
[2696] 
[2074] 

[ 1611 ] 

[1050] 
[1307] 

[1612] 
[ 822 ) 
[822] 
[1553] 
[1367] 
[ 2012 ] 
[ 1509] 
[1376] 
[1235] 
[2757] 
[ 1849] 
[ 1925 ] 
[1752] 
[1391] 
[1462] 
[ 799] 

[1861] 
[1577] 
[ 1281 ] 
[2059] 
[815] 

[ 1041 ] 


Listing THREED 


m'amw' 

MT 


letzten Zeile erscheinen muß. Pen-Anweisungen können 
zwischen eins und fünfzehn verwendet werden. Das Maschi¬ 
nenprogramm fangt ab der Koordinate 1,25 an, den Text in 
Großschrift umzuwandeln und ab der durch x,y beschriebe¬ 
nen Plotposition, die untere, linke Ecke markiert darzustel¬ 
len. Hierbei werden ab der Printposition 1,25 so viele Zei¬ 
chen umgewandelt, wie der Wert in w angibt - die Größe 
der 3D-Schrift wird in dem Parameter g übergeben, man 
kann zwischen eins und zwei wählen. Ansonsten können die 
Buchstaben mit den INKs eins bis drei gezeichnet werden. In 
MODE 0 muß der Wert w verdoppelt werden, da die Zeichen 
doppelt so breit sind. 

Und nun wünschen wir Ihnen viel Spaß! 

(Alexander Stroh/cd) 


1360 

DATA 

1370 

DATA 

1380 

DATA 

1390 

DATA 

1400 

DATA 

1410 

DATA 

1420 

DATA 

1430 

DATA 

1440 

DATA 

1450 

DATA 

1460 

DATA 

1470 

DATA 

1480 

DATA 

1490 

DATA 

1500 

DATA 


DE , BB 
CA, FE 
2A, A4 
A4,2A 
2 1, A4 
3E , 01 
31 , A4 
21 , OA 
A5,29 
A4,23 
23,22 
3A , 2A 
A5,3A 
23 , A4 
3C, 32 


21,04,00, 
A4,29,54, 
3C,32,2A, 
2B,A4,23, 
ED,5B,26, 
32,2A,A4, 
CD,CO,BB, 
00.3A.33, 
, 11 , 00 , 00 , 
, 23,22,2F, 
, 31 , A4,3A, 
, A4,3C,32, 
, 28,A4,3C, 
,3C,B8,C2, 
,24,A4,FE, 


3A,33,A4, 
50,CD,F9, 
A4,FE,03, 
23.22.2F, 
A4, 19,22, 
ED,5B,2F, 
3E,01,CD, 
A4,FE,01, 
CD.F9.BB 
A4,2A,31 
33 , A4,87 
2A,A4,B8 
32,28,A4 
88,A4,3A 
09,C2,68 


FE,01 
BB , 3A 
C2 , A2 
, A4,2A 
,31,A4 
, A4,2A 
, DE,BB 
,CA,42 
, 2A,2F 
,A4,23 
,3C,47 
,C2,27 
, 47,3A 
,24,A4 
, A4,C9 


[1351] 
[2520] 
[1617] 
[1928] 
[1780] 
[1028] 
[2736] 
[ 1877] 
[1728] 
[ 2021 ] 
[2054] 
[1699] 
[1694] 
[ 1981] 
[1729] 


— Part 


• THREED - 

2 THE DEMO — 

- 24.08.1988 - 

-- by Alexander Stroh -- 


— [CPC 464/664/6128] — 


1000 
1010 
1020 
1030 
1040 
1050 
1060 

1070 •- 

1080 MODE 1:BORDER 0:INK 0,0:INK 1,13:INK 
2,2 4:IN K 3,26:PAPER 0:PEN 1:CLS 
1090 DEFINT a-y:OEFSTR 1:KEY 138,"mode 2:i 
nk 1,24:1ist"+CHR$(13):f=l 

1100 IF PEEKC&A400)<>&C9 THEN MEMORY &A3FF 

:LOAD"!threedme",&A400:CALL &A400 

1110 RESTORE:f=3-f:zl=TIME:FOR m=0 TO 2:RE 

AD 1,x,y:LOCATE 1,25:PRINT 1 

1120 |THREED,x,y,LEN (1 ) , f:NEXT:LOCATE 1,25 

;PRINT SPACE$(14):z2=TIME 

1130 LOCATE 1,25:CALL &BB18:PRINT R0UND((z 
2-zl)/300,2):CALL &BB18:CLS:GOTO 1110 
1140 DATA "DO YOU LIKE",22,270,"THE GRAPHI 
C", 22.160," TRICKS? ".22.50 

Listing THREED___ 


[ 1287] 

[910] 

[2454] 

[1533] 

[2185 ] 

[1287] 

[ 1279 ] 

[1287] 
[3575] 

[3152] 

[4483] 

[4759] 

[5816] 

[3451] 

[2380] 
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DATABOX 


Das ist die Software zur PC International 

jeden Monat neu 

DATABOX: 

- mehr als der übliche Softwareservice 

- bringt ergänzend sämtliche Listings der jeweiligen 
Zeitschrift und alle Programmbeispiele auf Kassette 
oder auf 3-Zoll-Diskette. 

- Programme sind, soweit systembedingt möglich, 
auf allen drei CPC-Modellen lauffähig. Einzelheiten 
entnehmen Sie bitte der nebenstehenden Aufstellung. 


- Soweit die Programme nicht Bestandteil einer Serie 
sind, befinden sich alle Programme als »ready to run« 
auf der DATABOX. 

- erscheint jeden Monat und trägt das Titelbild des 
gleichzeitig erscheinenden Heftes. 

- Der Datenträger zur PC International enthält 
außerdem jedesmal ein zusätzliches Bonusprogramm, 
das nicht im Heft abgedruckt ist. 


Preisvorteil durch DATABOX-Abo: 

Unser beliebter DATABOX-Service kann selbstverständ¬ 
lich auch Im Abonnement bezogen werden. Dadurch 
sparen Sie Mühe und haben außerdem noch einen 
Preisvorteil gegenüber dem Einzelbezug. 

Das DATABOX-Abo kostet: 

Als Kassette für 1/2 Jahr 
(6 Lieferungen): 

Im Inland und West-Berlin.90— DM 

Im europäischen Ausland.100 — DM 

Im außereuropäischen Ausland.120,— DM 

Als Diskette (ür 1/2 Jahr (6 Lieferungen): 

Im Inland und West-Berlin.150,— DM 

Im europäischen Ausland.160,— DM 

Im außereuropäischen Ausland.180,— DM 

Als Kassette für 1 Jahr (12 Lieferungen): 

Im Inland und West-Berlin...180.— DM 

Im europäischen Ausland.200,— DM 

Im außereuropäischen Ausland.240,— DM 

Als Diskette für 1 Jahr (12 Lieferungen): 

Im Inland und West-Berlin.300,— DM 

Im europäischen Ausland.320,— DM 

Im außereuropäischen Ausland.360,— DM 

Bitte benutzen Sie für Ihre Bestellung 
die Abo-Karte. 

Widerrufsrecht: Jeder Abonnent hat das 
Recht, seine Bestellung innerhalb einer Woche 
beim DMV-Verlag, Postfach 250, 3440 Eschwe- 
ge. schriftlich zu widerrufen. Die rechtzeitige 
Absendung des Widerrufsschreibens genügt 
zur Fristwahrung. 



Einzelbezugspreise für Databox: 

3-Zoli-Diskette 


Inland: 


Ausland: 


Eirzelpieis 

24. - DM 

Etz« rvats 

24. DM 

«gl Vrjrr.anr1hnr.lnn 

4.- OM 

w-ül ve-aa-idtaiKün 

0.- DM 

End preis 

28.- DM 

Endprcla 

30.- DM 


Kassette 


Inlnnd: 


Ausland: 


Einzelpreis 

14.- DM 

Einzelpreis 

U.- DM 

aV WrenrfliMersn 

4 -OM 

. VbrsardWislor 

6.- DM 

Endpreli 

18,- OM 

Endpreis 

20.- DM 


Zahlungsweise: 

Am einfachsten per Vorkasse (Verrech¬ 
nungsscheck) oder als Nachnahme zu¬ 
züglich der Nachnahmegebühr. Bei 
Lieferungen ins Ausland ist Nachnah¬ 
me nicht möglich. 


Bitte benutzen Sie die Bestellkarte. 
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I—Tips & Tricks 


100,- DM 
für 1 kByte 

Die Heraus¬ 
forderung 

In vielerlei Hinsicht stellt die Zahl 1000 einen relativ 
großen Wert dar: 1000 DM etwa, oder 1000 Treppen, 
will man einen Turm besteigen. Auch 1000 Meter wer¬ 
den zu einer ungleich großen Qual, sollte man beschlie¬ 
ßen, sie im Dauerlauf zurückzulegen. 

Geht es allerdings darum, in nur 1000 Bytes ein Pro¬ 
gramm zu schreiben, dann merkt man plötzlich, was 
Einstein mit seinem Ausspruch “Alles ist relativ“ auszu¬ 
drücken gedachte. 

Auch diesen Monat versetzten uns daher folgende Kurz¬ 
programme in Erstaunen, doch sehen Sie selbst. 



DimmerScript (CPC 464/664/6128) 

Vom Fernsehen her kennt man che netten Schrifteinblendun- 
gen, die langsam aus dem Dunkeln erscheinen, als würden 
sie per Dimmerschalter sanft erhellt. 

DimmerScript erlaubt nun mit einer kurzen Routine, diesen 
Effekt auch auf dem CPC zu nutzen. Texte lassen sich so mal 
anders als gewohnt auf dem Monitor ausgeben. 

Es steht Ihnen hiermit eine interessante Alternative zur Ver¬ 
fügung. Beispielsweise läßt sich hiermit die Ausgabe von Ti¬ 
teltexten in Ihren eigenen Programmen variieren. 

Das Programm enthält eine kleine Demonstration. Um es in 
eigene Programme einzubauen, müssen nur die im folgenden 
beschriebenen Variablen gesetzt werden. 

Ein Unterprogramm, das im Listing ab Zeile 10000 zu finden 
ist, regelt dann das “Dimmern“. Dieses können Sie in Ihre 
eigenen Werke einsetzen, fertig. 

Die benutzten Variablen: 

In x und y werden die Koordinaten gespeichert, an der der zu 
schreibende Text ausgegeben werden soll. Die Ausgabe wird 
später mittels Locate-Funktion gesteuert, 
w steht für Waitflag. Diese Variable legt die Abstände der 
Farbwechsel fest. Sie beeinflußt daher die Geschwindigkeit 
des Authellens der Buchstaben. Je niedriger dieser Wert ge¬ 
wählt wird, desto schneller erscheint der Buchstabe. 

In a$ schließlich wird der Text abgelegt, den Sie auf dem 
Moinitor ausgegeben haben wollen. 

(Tim Juretzki/jf) 


RAFF (CPC 464/664/6128) 



Haben Sie Hunger? Wenn ja, dann 
probieren Sie es doch mal mit Zah¬ 
len! RAFF ist das Richtige für den 
großen Appetit. 

RAFFen Sie mit Ihrem Schlucker, in 
möglichst kurzer Zeit, viele Punkte 
zusammen. Gesteuert wird mit dem 
Zahlenfeld: 


NW 


N 


NO 


7 

8 

9 


W 

4 


6 

O 


1 

2 

3 


sw ; 


S 


SO 

Die Eingabe muß 

durch 

die 

<RETU RN >-Taste abge- 

schlossen werden. 






Die erste Zahl, die in der gewählten Richtung vor dem 
Schlucker steht, ist die Anzahl der Felder, die er in diese 
Richtung gehen wird. Alle Zahlen, die er dabei einRAFFen 
wird, werden addiert und rechts oben angezeigt. 

Halten Sie Ihren Schlucker auf Trapp, denn wenn er nichts zu 
RAFFen hat, d.h wenn er über leere Felder oder außerhalb 
des Spielfeldes geführt wird, bekommt er Bauchschmerzen 
und muß das RAFF-Vergnügen abbrechen. 

Nach Versagen werden Punkte und Zeit bekannt gegeben. 
Der beste RAFFer wird in der RAFF-Champion-Datci ver¬ 
ewigt. 

Wer des Raffens nicht müde wird, der muß nach Beendigung 
des Spiels durch RUN einen Neustart ausführen. 

Ein Hinweis zur RAFF-Champion-Datei: 

Für alle Kassettenbenutzer: Erst das Hauptprogramm und 
dann die Datei abspeichern. Die Datei muß vorher noch an¬ 
gelegt werden! Schreiben Sie: 

OPENOUT “r“:WRITE # 9,0,0:CLOSEOUT 
Haben Sie alles geRAFFt? Na dann GUTEN APPETIT !!!! 

(Timo Seehaus/jf) 

Ringkampf (CPC 464/664/6128) 

Wenn man sich für jedes Problem ein Programm schreiben 
würde, dann säße man zum einen den lieben langen Tag am 
Computer und zum anderen würden durch die Programmie¬ 
rung stetig weitere Probleme auftauchen, so daß man in einen 
Teufelskreis sondergleichen hineinschlendem würde. 

Zu den vom Computer am liebsten gelösten Problemen ge¬ 
hört die Lösung der Türme von Hanoi, jenem höchst interes¬ 
santen Verrückspiel, in dem es darum geht, einen aus ver¬ 
schieden großen Ringen zusammengesetzten Turm durch ge¬ 
schicktes Umbauen auf ein anderes Feld zu bekommen. Dem 
Spieler stehen dabei gerade drei Felder zur Verfügung, auf 
denen er seine Turmfragmente Zwischenlagern kann. Des- 
weiteren muß er beachten, daß er niemals ein größeres Teil 
auf einem kleineren postiert. 
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Tips & Tricks—i 


So leicht sich dieses Problem anhört, bei den ersten Versu¬ 
chen wird der Spieler gehörig ins Schwitzen geraten, da sich 
die Türme von Hanoi als äußerst widerstandsfähig heraus¬ 
steilen. 

Programmtechnische Lösungen gibt es in Mengen, nicht zu¬ 
letzt deshalb, weil die rekursive Lösung der Türme als Stan¬ 
dardbeispiel beim Erlernen der Programmiersprache Pascal 
dient. 

Aber, wie gesagt, warum alles vom Computer erledigen las¬ 
sen. Machen wir uns selber einmal daran, diese Nuß zu 
knacken. 

Das vorliegende 1 kByte-Programm ersetzt uns dabei die 
Turmfragmente. Wir können hiermit in aller Ruhe unser Ge¬ 
hirn trainieren, was sich zuweilen ja auch als recht vorteilhaft 
erweisen kann. 

Nach dem Starten des “Ringkampfes“ erscheinen die drei 
Flächen und der fertige Turm auf dem Bildschirm. Über zwei 
Eingaben (von wo nach wohin), die, da nicht per Input-An¬ 
weisung gearbeitet wird, keine Return-Bestätigung benöti¬ 
gen, läßt sich das Verrücken der Turmfragmente leicht hand¬ 
haben. 

Doch, genug der Worte, ringen wir mit dem Turm von Hanoi. 

(Volker Nordhoff/jf) 


Base 2014 (CPC 664/6128) 

Kleine grünliche Gesteinsbrocken hageln auf Ihren Planeten. 
Die einzige Möglichkeit, diesen Hagel zu überstehen, be¬ 
steht darin, die bunten Meteoriten vor dem Aufprall auf die 
heimatliche Raumstation mittels Laser in derart winzige 
Bröckchen zu zerlegen, daß sie keinen Schaden mehr anrich- 
ten können. 

Hierzu dient Ihnen eine kleine Bordlaserkanone (sie wird 
durch einen weißen Strich auf rotem Sockel dargestellt), die 
sich durch Betätigen der CURSOR-Tasten für rechts und 
links um genau 10 Grad in den gewünschten Winkel einstel¬ 
len läßt und bei einem Druck auf die Leertaste einen Schuß 
abgibt. 

Leider scheint die Technik auch in einem Zeitalter, wo be¬ 
reits Raumstationen errichtet werden, nicht ausgereift zu 
sein. Der Laser verfügt nämlich nur über eine bestimmte 
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CAICiH IT 


ln Catch It führt Sie eine rasante Kugeljagd direkt unter den Weihnachts¬ 
baum 


Energiemenge. Wird ein Schuß ab¬ 
gegeben, so sinkt natürlich der Ener¬ 
gievorrat. Zwar lädt sich die Waffe 
langsam wieder auf, doch ist trotz¬ 
dem Vorsicht geboten, will man 
nicht nach ein paar Schüssen wehrlos 
dem Kometenhagel gegenüber¬ 
stehen . 

Hinweise zum Bildschirmaufbau: 

In der linken oberen Ecke des Bildschirms wird Ihre Punkte¬ 
zahl angezeigt. Sie erhöht sich mit jedem Treffer um einen 
Punkt. 

Daneben ist die Anzeige der Energie Ihrer Raumstation ein¬ 
zusehen. Sollte sich ein Komet durch Ihr Verteidigungssy¬ 
stem schlängeln und als Landeplatz die Station wählen, so 
sinkt deren Energie, was zu verhindern ist. 

Ein horizontaler grüner Strich stellt schließlich die verblei¬ 
bende Laserenergie dar. 

(Christoph Schmitt/rs) 


Flying Strypes (464 mit EMU/664/6128) 

Früher war das Fliegen etwas besonderes. Heute, wo schon 
(fast) jeder mindestens einmal geflogen ist, gibt es andere Sa¬ 
chen, die uns faszinieren. 

Wie wäre es zum Beispiel mit einer Animation, mit gesteuer¬ 
ten (Flug-)Bewegungen von mehreren Linien auf dem Bild¬ 
schirm? 

Bevor jetzt Bemerkungen wie “Das kann ja jeder“ fallen, 
blättern Sie erst einmal um und schauen Sie auf die Länge des 
Programms. 

Mit definitiv drei Programmzeilen können schon wirklich 
gute Effekte erzielt werden. Gewußt wie!!! 

(Jens Uwe Bruch/rs) 


Catch It (464/664/6128) 

Weihnachten steht vor der Tür, der Christbaum wird ge¬ 
schmückt. Wo gehobelt wird, fallen gelegentlich auch Späne 
(in unserem Fall Christbaumkugeln). Da diese nicht gerade 
billig sind und meistens sogar Erbstücke und somit wichtige 
Erinnerungsträger sind, schmerzt es besonders, wenn eine 
dieser Kugeln auf den Boden fällt und zerschellt. 

Dieses Jahr ist die Gefahr besonders groß, da sich Großmut¬ 
ter fest vorgenommen hat, den Baum selber zu schmücken. 
Als weitere Schwierigkeit sollte noch angemerkt werden, 
daß die Kugeln zwar den Gesetzen der Schwerkraft folgen, 
jedoch durch die vielen Äste des öfteren die Richtung än¬ 
dern. 

Mit den Tasten [z] und [ \ J können Sie den Korb nach links 
beziehungsweise rechts steuern und 
mit diesem die herablällenden Ku¬ 
geln auffangen. 

Walten Sic also Ihres Amtes und ret¬ 
ten Sie in Ihrer Funktion als noch 
nicht geprüfter Christbaumkugelret¬ 
ter die Kugeln vor dem sicheren Zer¬ 
schellen. 

(Thorsten Mertsching/rs) 
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r~Tips & Tricks 


für 464-664-6128 

I 

1 MODE 1:BORDER 0:INK 0,0:INK 1,26:INK 2,1 [13420] 

8:INK 3,6 : P E N 1:DEG:DIM x { 79) ,y(73):f = 1:GO 

SUB 8: LOCAT E 1.24:F0R c = 0 TO 7 9 : x ( c ) = SI N < ( 
c-9)*10)*50:y(c)= COS( (c-9)* 10)* 50:PRI NT CH 
R$(207);:PLOT RND*640,RND*400:NEXT:1=25:PE 

N 3 r 

2 m=m+1:MOVE 0,3B2;DRAW m,382:GRAPHICS PEN [ 4 76 1 ] 

0:DR AW 639,382 : a= 1 : f = 1 :GOSUB 8:IF INKEY(8 

)= 0 AND g >0 THEN g = g-l 

3 IF INKEY(1)=0 AND g<18 THEN g = g+l [1493] 

4 f=3;G0SUB 8:a=9:TAG:MOVE x,y:PRlNT" ";:T [9371] 
AGOF F: IF INKEY(47)=0 AND m>0 THEN m=m-9:f= 

0:GOSUB 8:GOSUB 10:IOCATE x/16+1,26-y/16 : z 
$=COPYCHR$(#0):GOSUB 8:IF 2$='"' THEN t=t+l 
:GOSUB 9 

5 IF x < 9 OR x > 630 THEN GOSUB 9 [ 837 ] 

6 x=x+o:y=y—p:IF y<30 THEN 1=1-1:G0SUB 9 [1918] 

7 GRAPHICS PEN 2:TAG:M0VE x,y:PRINT CHR$(2 [3362] 
31 ) ; :GOTO 2 

8 MOVE 320,48:DRAW x(g)*a+320,y(g>*a+48;GR [2887] 
APHICS PEN f : RETURN 

9 x=RND*400+120:y=368:p=RND*21+9:o=RND*30- [8369] 

RND*30:IF 1<1 THEN CLS:PRI NT"Game Over!",t 
"Score! " : END 

10 PRINT CHR$(30);"SCOREt,:PEN 2:PRINT"E [5860] 
NERGY:"1 :PEN 3:S0UND 1,0,5, , , ,31:LOCATE 19 

,23:PRINT"<HH>";RETURN 

Lisling Base 2014 



10 MODE 1:b=16:v=14:INPUT"LEVEL (l-5)';a:I [4504] 

F a <1 OR a > 5 THEN 10 

20 CLS:a$=CHR$(231):k$=CHR$(198):PEN 2:LOC [4268] 
ATE 13,24:PR I NT"* * CATCH IT! **" 

30 LOCATE 2,10:PRINT'BALLS:":LOCATE 33,10: [5459] 

PRINT"SCORE:":PEN 1:L0CATE v,20:PRINT k$ 

40 FOR i=1 TO 6:LOCATE 21-i.1*3:FOR j=l TO [4968] 
i :PRI NT CHR$(230>" ";:NEXT j.i 
50 PLOT 150,50,3:DRAW 150,390:DRAW 470,390 [2455] 


:DRAW 470,50:DRAW 150,50 

60 w=0:x=20:y=1:b=b-1:LOCATE 3,11:PRINT b: [2941] 
IF b<1 THEN END 

70 z = x: IF (y+l)/3<>INT( (y+l)/3) THEN 90 [ 2982 ] 

80 SOUND 1,10,1,6:IF RND*1>0.5 THEN x=x-l [3211] 
ELSE x=x+l 

90 t=y:y=y+l:LOCATE 2 ,t:PRINT" ":LOCATE x, [4338] 
y:PRINT a$ 

100 c$=INKEY$:e=v:IF c$="z" AND v>15 THEN [5667] 


w=w+1:v= v-2 ELSE IF c$ = "\" AND v<26 THEN v 
=v+2:w=w+l ELSE 120 

110 LOCATE e,20:PRINT" ":LOCATE v,20:PRINT [1040] 

k$ 

120 IF y < 2 0 THEN 140 ELSE LOCATE x,y:IF x= [5004] 
v THEN SOUND 1 ,100,5,15:PRINT k$:s=s+100-a 
*w:LOCATE 34,11:PRINT s ELSE PRINT" " 

130 GOTO 60 [390] 

140 FOR 1=1 TO a*30:NEXT:GOTO 70 [1696] 

Listing Catch It 


10 'fr********************************** 

20 '** by JENS UWE BRUCH ** 

30 

40 MODE 2 

50 LOCATE 28,2:PRINT"FLYING STRIPES" 

60 IF INKEY( 4 7 ) = 0 THEN GOTO 70 ELSE GOTO 6 
0 

70 DEG:GRAPHICS PEN 3:a=2:B=PI:MODE 2;PL0T 
640,200:FOR c=0 TO 10000 
80 DRAW 320*(l+COSCC*2)),200*(1+SIN(a+c*b) 


) 

90 CALL 8,BC4D:NEXT 


( 1460] 

[1486] 

[1460] 

[513] 

[2369] 

[1196] 

[4679] 

[ 1604 ] 

[ 925 ] 


Listing Flying Strypes 


10 DIM s$(3,7 ) ,h(3):h(1)=0:h(2) = 7:h(3)=0:M [9797] 
ODE 1 : LOCAT E 1,19:PRINT ST RI NG$ ( 3 9 , .9 5 ) : LOC 
ATE 7,21:PRINT"I"SPC(12)"II"SPC(10)"III":s 
$(1,0 ) = STRING$(15,32) :s$(2,0) = s$(l,0) :s$(3 
,0) = S$(1,0) : LOCATE 16,5: PRI NT"RINGKAMPF" 

20 FOR t=l TO 7:s$(2,t)=STRING$(15-t*2,143 [7116] 
) ;PEN t MOD 3+1:LOCATE 20-LEN(S$(2,t) )\2,1 
8-t:PRINT s$(2,t):NEXT 

30 PEN 1 :n$ = CHR$(143)+CHR${8) :LOCATE 5,23: [ 3557 ] 

PRINT"Von :" n $; 

40 a$=INKEY$:IF a$<"l"OR a$>"3"THEN 40 ELS [3411] 
E a=VAL(a$):PRINT a$ 

50 LOCATE 25,23;PRINT"Nach :"n$; [1124] 

60 a$=INKEY$:IF a$<"l"OR a$>"3"THEN 60 ELS [3605] 
E b=VAL(a$):PRINT a$ 

70 IF LEN(s$(b,h(b)))>LEN(s$<a,H(a)))THEN [8883] 
h(b>=h(b)+l:s$(b,h(b))=s$(a,h(a)):PEN h(b) 

MOD 3+1:LOCATE b*13-6-LEN(s$(b,h(b) ) )\2 , 18 
-h(b):PRINT s$(b,h(b)):LOCAT E a*13-12,18-h 
(a):PRINT SPC(13) :h<a ) = h(a)-l 

80 LOCATE 1 , 2 2: PRI NT CHR$(20):IF h(l) = 7 OR [ 6890] 
h(3)= 7 THEN LOCATE 13,25:PR INT"GESCHAFFT 
! ! ":LOCATE 1, 1:E ND ELSE 30 

Listing Ringkampf 


10 PEN 1:MODE 1:DIM k(33,33):FOR X=1 TO 25 [9246] 

:FOR y=1 TO 25:k(y,x) = 1 NT(RND*8) + 1:PRI NT U 
SING"#" ;k(y,x ) ; :NEXT:PRINT:NEXT:PEN 2:x = IN 
T(RND*24) + 1 :y=I NT(RND*24) + 1:t = TIME 

20 LOCATE x,y:PRINT"*":LOCATE 29,3:PRINT s [14812] 
:LOCATE 29,9: q = 0 : Z=0 :INPUT r:IF r=4 THEN q 
= -l ELSE IF r = 7 THEN q=-l:z = -l ELSE IF r = 8 
THEN z=-l ELSE IF r=9 THEN q=l:z=-l ELSE 
IF r = 6 THEN q=l ELSE IF r = 3 THEN q = l:z = l E 
LSE IF r = 2 THEN z = l ELSE IF r=l THEN q = -l: 
z=l 

30 IF q=0 ANO Z=0 THEN 20 [1408] 

40 n=INT((TIME-t)/300):v=k(x+q,y+z):IF v=0 [6226] 
THEN 50 ELSE LOCATE x,y:PRINT" ":FOR w=1 
TO v:e=x+w*q:f=y+w*z:u=k(e,f) 

50 IF u = 0 OR e <1 OR e>25 OR f<l OR f>25 TH [ 13867 ] 

EN CLS:OPENIN"r":INPUT#9,h,t:IF s<h THEN P 

RI NT"You :"s"Pkt"n"s", ,"Best:"h"Pkt"t"s" E 

LSE PRINT"New Best"s"Pk t"n"s":OPENOUT"r":W 

RITE#9,s,n ELSE LOCATE e, f:PRINT" ":s=s+u: 

u=0:k(e,f)=0:NEXT:x=e:y=f:GOTO 20 

Ltsung RAFF 


10 MODE 1 

20 INK 1,26:INK 0,1:INK 2,0:INK 3,15:BORDE 
R 2 

30 a$="Di es Ist eine kleine Demonstration 
von" :x=(40-LEN(a$) ]/2:y = 5:w = 5:GOSUB 100 00 
40 a$="DimmerScript”:x=(40-LEN(a$))/2:y=8: 
w=10:GOSUB 10000 

50 a$="Geschrieben von":x=(40-LEN(a$))/2:y 
=11:w=8:GOSUB 10000 

60 PEN 3 : a$ = " T i tn Ju retz ky ": x= ( 40-LEN ( a$ )) / 
2 : y=14:w=10:GOSUB 10000 
70 PEN 1 

80 a$="Eine Taste. . .":x=(40-LEN(a$))/2 : y-2 
0:w=5:GOSUB 10000:CALL &BB06:FOR y=0 TO 40 
0 STEP 2:MOVE 0,y:DRAWR 640,0,0:NEXT:END 
10000 REM 

10010 REM Routine DimScript 
10020 REM x = X - Koordinate , 
y - Y - Koordinate , 
w = Waitf1ag , 
a$ = Text 

10030 FOR 1=1 TO LEN<a$) 

10040 PEN 2: LOCAT E x+i,y:PRINT MID$(a$,i,l 
);:FOR t=0 TO 26:INK 2,t:FOR 0=1 TO w:NEXT 
:NEXT:PRINT CHR$(8);:PEN 1:PRINT MI0$(a$,i 
, 1 ) ; :INK 2,0:NEXT 
10050 RETURN 
Listing DimmerScript 


[ 506 ] 

[3011] 

[3273] 

[ 5005 ] 

[4522] 

[3507] 

[ 549 ] 
[7782] 


[ 2 72 ] 

[ 1506 ] 
[ 3496 ] 


[ 791 ] 

[9064] 


[ 555 ] 
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CPC 

Sonderhefte 

Nr. 3 bis 7 

5 Stück = 35,- DM 


Jetztzugreifen 


Halber Preis/ganze Leistung 


wird es aber höchste 
Eisenbahn, daß Sie endlich 
unsere CPC-Sonderhefte 
kennenlernen! 

Kraftfutter für Ihren CPC - 
jetzt zum günstigen Preis. 


CPC-Sonderheft 8 

Programme Aus dem Inhalt 


Bericht 

DFÜ- Ihr Anschluß an die Zukunft. 

Alles über das Thema DFÜ. Von 
Zubehör bis hin zu Telefonnummern. 
Inklusive Protokolle. 

Anwendung 

Die Weltzeit im CPC 

Berechnungen von Zeitzonen in aller Welt. 

Blick zu den Sternen 

Ein Satellitenberechnungsprogramm. 

Spiele 

Golddukaten und Schiffskanonen. 
Super-Grafik-Handelssimulation ä la Hanse. 

Ran an die Kisten 

Super-Adaption des Strategiespiels “Soko- 
ban“. Mit eigenem Editor! 


Bistro “La Cuisine“ 

Steuern Sie einen programmierbaren 
Roboter, der hoch hinaus will. 

Tips und Tricks 

Nützliche Betriebsadressen im CPC. 

Klein, aber oho 

Viele Super-Programme in IkByte. 

Schnell abzutippen, mit überraschender 
Wirkung. 

Hardware 

Das CPC Fitness-Center. 

Der absolute Wahnsinn. Eine Joystick-Matte 
im Selbstbau. Ein Vergnügen für die ganze 
Familie. 

CP/M intern 

Alles über das Betriebssystem CP/M. 


nur 14,- DM* 



* Unabhängig von der Anzahl der bestellten Artikel berechnen wir für das Inland 4,- DM bzw. für das Ausland 6,- DM Porto und Verpackung. 

Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag - Postfach 250 - 3440 Eschwege 

/ / /Daten- und 

Medienverlag 
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Eine neue Bewertung 


Da sich doch in letzter Zeit die Stim¬ 
men häuften, die da meinten, unser Be¬ 
wertungsschema sei ein wenig unüber¬ 
sichtlich, wollen wir von dieser Ausga¬ 
be an eine neue Art der Bewertung von 
Spielesoftware einführen. 

Drei Dinge haben wir geändert, um 
eine auf den ersten Blick einsichtige 
Benotung zu erhalten. Die Noten für 
die einzelnen Rubriken sind ab jetzt 
dem Schulsystem angepaßt. Es werden 
Noten von 1 bis 6 gegeben, anstatt von 
1 bis 10, wobei eine 1 natürlich eine be¬ 
sonders gelungene Gestaltung des be¬ 
treffenden Punktes dokumentiert. Die 
Balken entfallen und werden durch Zif¬ 
fern ersetzt. 

Vier Sparten werden direkt benotet. 
Sie enthalten keinerlei Meinungen. Im 
Gegenteil, es wird versucht, hier ein 
möglichst sachliches Urteil zu geben. 
Die Sparten und welche Fragestellun¬ 
gen sie beinhalten sind: 


— Grafik: Wie gut wurde das Pro¬ 
gramm grafisch gestylt? Ist even¬ 
tuelles Scrolling flüssig? Bewegen 
sich die Sprites ordentlich, und sind 
sie detailliert animiert? 

— Sound: Wie steht es um die Qualität 
von Titelmusik und Begleitgeräu¬ 
schen? 

- Motivation: Schafft es die Idee und 
Ausführung des Programms, den 
Spieler lange zu fesseln, oder wird 
das Ganze schon nach kurzer Zeit 
langatmig? 

- Bedienerfreundlichkeit: Besitzt das 
Spiel eine plausible Tastaturbele¬ 
gung? Sind die Aktionsmöglichkei¬ 
ten, die das Programm zur Verfü¬ 
gung stellt, genau dokumentiert? 



Die Einzelkriterien haben sich etwas geändert. Eine Ge¬ 
samtnote wird unter Berücksichtigung des Testers erstellt 


Eine fünfte Note rundet die neue Be- I 
wertung ab. Sie gibt den Gesamtein¬ 
druck des Programms wieder, auch un¬ 
ter Berücksichtigung der ganz persön¬ 
lichen Meinung des Testers. Hier kann 
es also durchaus der Fall sein, daß die 
Gesamtnote scheinbar von dem Durch¬ 
schnitt der einzelnen Teilnoten ab¬ 
weicht, da sie sich nicht rein rechne¬ 
risch aus den Einzelnoten bestimmen 
läßt. 

Wir hoffen, daß wir mit diesem Bewer¬ 
tungsschema eine Neuerung bieten 
können, die Ihnen auf den ersten Blick 
die gewünschten Informationen liefert. 
Auf Ihre Meinung diesbezüglich sind 
wir gespannt. 




Gilbert - 

Escape from Drill 


Hersteller: Again & Again 
Vertrieb: Fachhandel, Leisuresoft 
Steuerung: Joystick, Tastatur 
Preis: stand bei Redaktionsschluß 
noch nicht fest 

CPC 464 Kl CPC 664 KI CPC 6128 CS 


Protzender Fernsehstar 

Gilbert ist ein gefragter TV-Star. Mit 
seinem Raumschiff düst er oft vom Pla¬ 
neten Drill zur Erde, um dort Rollen in 
aufwendigen Filmproduktionen zu 
spielen. Das wäre alles schön und gut, 
wenn Gilbert nicht ein derartiger An¬ 
geber wäre, daß er ständig mit seiner 
Popularität protzen muß. Die Bewoh- 


Gilbert, der TV-Star. 
hat auf der Suche 
nach den fünf ver¬ 
schollenen Raum¬ 
schiffteilen einiges zu 
tun 

ner von Drill stört das in solchem 
Maße, daß sie in einer Bestrafungsak¬ 
tion Gilberts Raumschiff auseinander¬ 
nehmen und fünf wichtige Bauteile auf 
dem riesigen Planeten verstecken. Eine 
unangenehme Geschichte, muß der 
Filmstar doch innerhalb von 24 Stun¬ 
den auf der Erde sein. 

Schafft er das nicht, so kann er einen 
Vertrag für eine neue TV-Serie nicht 
unterschreiben. 

Es liegt nun an Ihnen, als Gilbert die 
verlorenen Teile schnell wiederzufin¬ 
den. Mit dem Joystick steuern Sie den 
Angeber durch Wüste, Kanalisation 
und eine Stadt. Der Planet ist riesig. 
Gilbert kann es unmöglich schaffen, in 
24 Stunden überall systematisch nach 


den verschwundenen Bauteilen zu su¬ 
chen. Er ist auf Tips angewiesen. 

Durchs Spiel zur Erkenntnis 

Die Bewohner von Drill rücken dum¬ 
merweise nur mit Informationen her¬ 
aus, wenn der Filmstar sich herabläßt 
und mit ihnen in schummrigen Kneipen 
an Automaten spielt. Da gibt es fünf in¬ 
teressante Spielchen: ln einem vernich¬ 
tet man Rosenkohlvertilger, in einem 
anderen widmet man sich den guten al¬ 
ten Space Invaders. Außerdem gibt es 
noch einen Automaten, bei dem es dar¬ 
um geht, numerierte Geldsäcke einzu¬ 
sammeln. Memory und ein Spielchen, 
in dem man Bildschirmgegner voll- 
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Autor: Matthias Uphoff 

Von der Idee zum Programm 



Der Computer als Stratege 

Ein raffiniertes System von Spielzugbe¬ 
wertungen macht den CPC zu einem fast 
unschlagbaren Gegner im Gobang-Spiel, 
der Ihnen anfangs saftige Niederlagen 
bescheren wird. Keine Angst - das 
Programm ist zu schlagen - aber wie, das 
müssen Sie selbst herausfinden. 


Das Spiel des Lebens 

Nach natürlichen Prinzipien des 
Wachstums erzeugt der Computer 
phantastische, kristallförmige Farb- 
strukturen. Ändern Sie die Regeln und 
Voraussetzungen und sehen Sie, was 
für neue, noch nie dagewesene For¬ 
men sich ergeben. 


Das Ökologie-Experiment 

Der Computer zeigt Ihnen in animier¬ 
ter Farbgrafik einen simulierten 
Lebensraum mit Weideland, Schafen 
und Wölfen. Erforschen Sie die öko¬ 
logischen Gesetzmäßigkeiten, und 
schaffen Sie ein stabiles, natürliches 
Gleichgewicht. 


Pascal läßt grüßen 

Ein erstaunliches Programm enthüllt 
verborgene Strukturen im 
sogenannten "Pascalschen Drei¬ 
eck“. Die grafische Darstellung 
ergibt traumhaft schöne und farbige 
Musterbilder. 


Weiterhin: 


Das Software-Experiment 

• Siebzehn verschiedene, lauffähige Programme 

• 180 Seiten Anleitung 

Kassette nur DM 29, - * 

Diskette nur DM 39, - * 


für CPC 464/664/6128 


Mil roher Rechengewalt 

Mit dem “Brute-Force“- 
Algorithmus darf der CPC so rich¬ 
tig loslegen und spielt mit roher 
Rechengewalt in dem afrikani¬ 
schen Strategiespiel “Kalaha“ alle 
Gegner an die Wand - oder kön¬ 
nen Sie ihn trotzdem schlagen? 


Nehmen Sie teil an dem Abenteuer 
"Computer"! In zehn lebendig und 
leicht verständlich geschilderten Reisen 
in die Welt der Computergrafik, Simula¬ 
tion und künstlichen Intelligenz erarbei¬ 
tet der Autor mit Ihnen zusammen 
insgesamt 17 interessante Programme, 
die Sie auf Diskette/Kassette erhalten. 


Das umfangreiche, 180 seifige Handbuch 
vermittelt Ihnen auf anschauliche und 
unterhaltsame Weise, wie aus Algorith¬ 
men Datenstrukturen und letztendlich 
Software entsteht: Von der Idee zum 
Programm - der ideale Kursus zum 
Einstieg in das Computerwissen, für 
Hobby und Schulunterricht. Sehen Sie 
selbst, zu welchen phantastischen 
Grafiken und verblüffenden Intelligenz¬ 
leistungen der CPC bei raffinierter 
Programmierung fähig ist! 


Der Computer lernt 

Erleben Sie ein Paradebeispiel für “Künstliche Intelligenz": Das Programm 
‘Minischach" ist lernfähig und wird mit jeder Partie ein bißchen besser. 


Komplexe Grafik 

Sie lernen die mathematischen Grundlagen von Fraktalgrafiken und erarbei¬ 
ten einen kompletten Fraktalgenerator zur Erzeugung von “Apfelmännchen"- 
Bildern. 


Wordmaster 

Sie raten ein Wort, das sich der Computer ausgedacht hat. Dann rät der 
Rechner ein Wort, das Sie sich ausgedacht haben. Wer braucht weniger 
Versuche? Sie werden sich wundern,.. 


Wordketten 

Mit einem raffinierten Algorithmus löst der CPC Wortketten-Rätsel. Oder er 
erfindet neue Rätsel - ganz wie Sie wollen. 

Entwicklungshilfe 

Eine gut ausgestaltete Simulation versetzt Sie in die Lage eines Entwick¬ 
lungshelfers, der eine Hungersnot abzuwenden versucht. Aber Ihre Mittel 
sind begrenzt. 


* Unverbindliche Preisempfehlung. Unabhängig von der Anzahl der bestellten Artikel berechnen wir für das Inland A- DM bzw. für das Ausland 6.- DM Porto und Verpackung, 

Bitte benutzen Sie die Bestellkarte. / / / 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege 

/ / /Daten- und 

Medienverlag 
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schleimen muß, sind ebenfalls mit von 
der Partie. 

Alle Automatenspiele sind äußerst 
schwer. Sie müssen sich ungeheuer an¬ 
strengen, um zu gewinnen. Nur dann 
geben die Drilliers pro gewonnenem 
Automatenspiel einen Hinweis, wo 
sich ein Bauteil von Gilberts Raum¬ 
schiffbefindet. 

Jetzt brauchen Sie sich nur noch zum 
beschriebenen Ort zu begeben. Das 
Bauteil ist nun leicht zu finden und 
kann eingesammelt werden. Verliert 
der Held ein Automatenspiel, verkürzt 
sich die Zeit, die zum Suchen der Teile 
bleibt. Erst wenn die fünf Automaten 
bezwungen und alle Bauteile gefunden 
sind, ist das Spiel gelöst. 

Während die Automatenspiele in den 
Bars sehr schwer sind und Gilbert da¬ 
durch oft wertvolle Zeit verliert, ist das 
weitere Spielgeschehen auf dem Plane¬ 
ten etwas leichter, obwohl überall 
schleimiges Ungeziefer kreucht und 
fleucht. Berührungen mit diesen We¬ 
sen kosten mehrere Sekunden Straf¬ 
zeit. Es besteht jedoch die Möglich¬ 
keit, alle Widersacher abzuschießen. 
Manchmal sammelt der suchende 
Filmstar auch Nahrungsmittel ein, die 
seine Gestalt verändern. Ißt er bei¬ 
spielsweise Bohnen, bläht sich sein 
Magen auf, so daß er aus Fallgruben 
oder der Kanalisation emporschwebt. 

Mäßige Grafik mit toller 

Sounduntermalung 

“Gilbert - Escape from Drill“ verfügt 
über ein spannendes Konzept. Der 
Held läuft durch eine Abenteuerwelt, 
sucht Gegenstände und versucht sich 
an Automatenspielen. Während die 
Spielautomaten noch einen gewissen 
Unterhaltungswert bieten, langweilt 
die Suche auf dem Planeten. Die Pro- 


Erst im Hell, dann 
bei Ellie! Bond zieht 
wieder alle Register 
seiner mannigfaltigen 
Talente 

grammierer haben in diesem Teil des 
Spiels für zuwenig Abwechslung ge¬ 
sorgt. Grafisch macht das Programm 
ebenfalls einen sehr unausgereiften 
Eindruck: Alle Bilder sind in nur vier 
Farben dargestellt (grün, rot, gelb, 
blau). 


Bedienung- A 
l'rcundlicfikeil i“ 

Grafik ^ 

Endnote 

Motivation ^ 

Sound ^ 

4 


Während die Grafik dem Auge keinen 
Hochgenuß bieten kann, bringt der 
Sound die Ohren zum Verzücken: Fet¬ 
zige Musik und passende Effekte sor¬ 
gen für gelungene Sounduntermalung. 
Alles in allem handelt es sich bei “Gil¬ 
bert — Escape from Drill“ um ein 
durchschnittliches Spiel, das wenig¬ 
stens für einige Stunden zu unterhalten 
vermag. 

(Carsten Borgmeier/jlj 


Lizenz zum Töten 

Hersteller: Domark 
Vertrieb: Fachhandel, Bomico 
Steuerung: Joystick, Tastatur 
Monitor: Farbe/Grün 
Preis: 34,95 DM (Kass.) 

49,95 DM (Disk.) 

CPC 464 IXI CPC 664 XI CPC 6128 X 

44 Gestatten, mein Name ist 

Bond, James Bond! 44 

27 Jahre ist es her, seit dieser schon fast 
legendäre Begrüßungssatz zum ersten 


Mal über die Lippen von Sean Conne- 
ry, dem Ur-Bond, kam. Damals, im 
Jahre 1962, stellte er sich so einer 
leicht bekleideten, in einem Hotelzim¬ 
mer golfspielenden Dame vor. 

Seitdem wechselte der filmische James 
Bond viermal sein Outfit, seine Sprü¬ 
che aber blieben - wenn auch jener 
markante im bislang letzten Werk 
fehlte. 

Seit vier Jahren gibt es jeden Sommer 
den Superstar unter den Geheimagen¬ 
ten auch als Computerspiel. “Domark“ 
macht’s möglich! Vor knapp einem 
Monat veröffentlichte der englische 
Hersteller die ’Versoftung’ zum neue¬ 
sten Bond “Lizenz zum Töten“. Genau 
wie im Film hat 007 die Aufgabe, den 
fiesen Drogenschmuggler Sanchez zu 
vernichten. Zu Beginn des Spiels jagt 
man den Drogendealer mit einem Hub¬ 
schrauber. Von allen Seiten schießen 
Geschütze auf den Helikopter. 

Anfangs schien mir “Lizenz zum Tö¬ 
ten“ fast unspielbar schwer zu sein. Als 
ich das neue Bond-Spiel die ersten 
Male ins Laufwerk schob, wurde ich 
fast wahnsinnig vor Frust! Da flog ich 
doch brav mit meinem Helikopter dem 
flüchtigen Sanchez hinterher und zer¬ 
schellte andauernd an Scheunendä¬ 
chern und Gartenzäunen. Im allgemei¬ 
nen ist ein Gartenzaun maximal zwei 
Meter hoch. Man müßte folglich mit 
einem Hubschrauber bequem über ein 
solches Hindernis fliegen können. 
Doch das haben sich die Programmie¬ 
rer anders überlegt: Jedes Überfliegen 
von Baum, Busch, Scheune oder Gar¬ 
tenzaun führt zum Explodieren des 
Hubschraubers. Wie kommt man bloß 
an diesen Hindernissen vorbei? Die 
Anleitung schweigt sich zu diesem 
Thema leider völlig aus. 

Nach einiger Zeit intensiven Auspro¬ 
bierens kam ich endlich drauf: Man 
muß einfach langsam über der Straße 
fliegen und die Geschütze an der Seite 
abknallen, dann gelangt man recht 
schnell ans Ende des Spielabschnitts, in 
dem Bond per Fallschirm im Gelände 
landet. Im zweiten Level steuert man 
Bond durch ein Territorium, in dem 
sich Sanchez’ Schergen verschanzt ha¬ 
ben. Die ballern munter auf den armen 
Bond, dessen kugelsichere Weste nur 
fünf Treffer aushält. Sie steuern Bond 
in alle Richtungen, suchen Schutz hin¬ 
ter Kästen, sammeln Munition ein und 
knallen Widersacher ab, die den Weg 
versperren. 

Auch hier ist das Spiel wieder gewöh¬ 
nungsbedürftig. Es reicht nicht, ein- 
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»EinzeIheft-/Databox-Bestellung« 

Ich bestelle folgende Einzelhefte bzw. Databoxen von »PC Amstrad«: 


Einzelheft 

CPC 

CPC 

Joyce 

PC 1512 

Ausgabe 

Kassette 

3“-Diskette 

3“-Diskette 

5 1/4"-Diskette 

6.- 1 

DM/Stck 

14.- DM/Stck. 

24.- DM/Stck. 

24,- DM/Stck. 

24,- DM/Stck. 

□ 

1/88 

□ 

□ 

□ 

□ 

□ 

2/88 

□ 

□ 

□ 

□ 

□ 

3/88 

□ 

□ 

□ 

□ 

□ 

4/88 

□ 

□ 

□ 

□ 

□ 

5/88 

□ 

□ 

□ 

□ 

□ 

6/88 

□ 

□ 

□ 

□ 

□ 7/88 

□ 

□ 

□ 

□ 

□ 

8/88 

□ 

□ 

□ 

□ 

□ 

9/88 

□ 

□ 

□ 

□ 

□ 

10/88 

□ 

□ 

□ 

□ 

□ 

11/88 

□ 

□ 

□ 


— 

12/88 

□ 

□ 

□ 

□ 

□ 

1/89 

□ 

□ 

□ 

□ 

□ 

2/89 

□ 

□ 

□ 

□ 

□ 

3/89 

□ 

□ 

□ 

□ 

□ 

4/89 

□ 

□ 

□ 

□ 

□ 

5/89 

□ 

□ 

□ 

□ 

□ 

6/89 

□ 

□ 

□ 

□ 

□ 

7/89 

□ 

□ 

□ 

□ 

□ 

8/89 

□ 

□ 

□ 

□ 

□ 

9/89 

□ 

□ 

□ 

□ 

□ 

10/89 

□ 

□ 

□ 

□ 

— 

11/89 

□ 

□ 

□ 

□ 


CPC-Sonderhefte (bitte ankreuzen): 

312 □ Sonderheft 6/88 .. 14,- DM 

313 □ Sonderheft 7/88 . .. 14,- DM 


□ Best.-Nr. 531 


Sammelordner PC 


2 Stck. 15,80 DM 


+ Porto/Verpackung 

(Inland 4, - DM, Ausland 6. - DM) _ DM 


Gesamtbetrag: 


DM 





Software-Review—i 



Bei der Suche nach 
verborgenen Schät¬ 
zen hat Rick Dange- 
rous gefährliche 
Abenteuer zu be¬ 
stehen 


fach nur den Feuerknopf zu drücken, 
um einen Bösewicht ins Jenseits zu be¬ 
fördern. Ein Zielfernrohr muß zuvor in 
Position gebracht werden. Erst dann 
läßt sich der Gangster treffen. In der 
Spielsequenz ist knallharte Action an¬ 
gesagt! 

Mit Leichen gepflastert... 

Da müssen massenweise Gangster¬ 
sprites um die Ecke gebracht werden, 
bis 007 zum Hubschrauber gelangt, der 
für den nächsten Spielabschnitt wieder 
von besonderer Bedeutung ist. Jetzt gilt 
es, mit dem Helikopter an ein Flugzeug 
anzudocken. Dann beginnt der nächste 
Level, in dem Bond mit Taucheranzug 
durchs Meer schwimmt. Mit einer Har¬ 
pune soll Bond auf die Schwimmer ei¬ 
nes Wasserflugzeugs schießen, das 
Drogen transportiert. Danach zerstö¬ 
ren Sie noch schnell ein paar Tanklast¬ 
züge, und dann geht das Spielchen mit 
erhöhtem Schwierigkeitsgrad von vor¬ 
ne los. 

Langzeitunterhaltung 

Um “Lizenz zum Töten“ durchzuspie¬ 
len, müssen Sie aber erst viele, viele 
Stunden vor dem Monitor verbringen. 
Leicht ist das Spiel nämlich nicht. Be¬ 
sonders der zweite Level hat’s in sich. 



Meiner anfänglichen Skepsis folgte Be¬ 
geisterung. Das Spiel ist durch die vie¬ 
len unterschiedlichen Levels abwechs¬ 
lungsreich gehalten. Auf jeden Fall ist 


gegenüber den anderen drei bisher ver¬ 
öffentlichten Bondspielen eine deutli¬ 
che Steigerung festzustellen. 

(Carsten Borgmeier/rs) 


Rick Dangerous 

Hersteller: Firebird 
Vertrieb: Rushware, Leisuresoft, 
Fachhandel 

Steuerung: Joystick, Tastatur 
Monitor: Farbe, Grün 
Preis: 39,95 DM (Kass.) 

49,95 DM (Disk.) 

CPC 464 Kl CPC 664 Kl CPC 6128 K 

Im Herzen des Urwalds leben die wil¬ 
den Goolus. Schatzsucher und Aben¬ 
teurer wurden auf diesen Stamm auf¬ 
merksam, weil er einen riesigen Reich¬ 
tum an Gold und Edelsteinen besitzt. 
Irgendwo in einem großen Tempel soll 
der Schatz versteckt sein. Diese Legen¬ 
de kommt auch dem wagemutigen 
Abenteurer Rick Dangerous zu Ohren. 
Überall, wo es Gold und Klunker zu 
holen gibt, fühlt er sich pudelwohl. 
Aus diesem Grunde fliegt Rick flugs in 
den sonnigen Süden, um den Tempel 
zu finden und nach den Goolu-Schät- 
zen zu forschen. Als er das Gottesgrab 
betritt, rollt ein riesiger Fels hinter ihm 
her. Wenn sich nicht ein stahlharter 
Joystickakrobat findet, der ihn aus der 
Situation rettet, ist es schnell um den 
Helden geschehen. Der rollende Fels 
ist noch die angenehmste Falle im riesi¬ 
gen Tempel. Die Goolus haben auch 
herunterfallende Metallgitter und 
Holzspeere installiert, die jeden gieri¬ 
gen Eindringling aufspießen. Außer¬ 
dem schieben wilde Kannibalen Wa¬ 


che. Jede Kollision mit diesen finsteren 
Gestalten ist tödlich. Auf dem Weg 
durch den Tempel stößt Rick auch auf 
Steinmauern und Geröll, die den Weg 
versperren. Mit seinem Vorrat an Dy¬ 
namitstangen lassen sich glücklicher¬ 
weise alle Hindernisse aus dem Weg 
sprengen. Auch den vielen Wächtern 
steht der Schatzsucher nicht hilflos ge¬ 
genüber: Rick zieht einfach sein 
Schrotgewehr hervor und schießt ner¬ 
venden Wachen eine ordentliche La¬ 
dung ins Gesäß. Achtung! Munition ist 
knapp! Bis zur nächsten Kiste mit fri¬ 
schem Dynamit und neuem Schrot ist 
oft ein unangenehm weiter Weg. Also, 
sparsam sein! Es ist schon erstaunlich, 
wie riesig so ein Tempel sein kann. Die 
Anlagen erstrecken sich über viele Bil¬ 
der, die sich in alle vier Richtungen auf 
dem Monitor ausdehnen. 

Oft verlangt die Beschaffenheit der 
Felsen, daß Rick durch einen schmalen 
Gang krabbelt oder in tiefe Abgründe 
hüpft. Als Belohnung für seine Mühe 
kann Rick ab und zu wertvolle Statuen 
einsammeln, denen er auf seiner Reise 
durch den Tempel begegnet. Sind alle 
Schätze im Goolu-Tempel gefunden, 
geht es in einer ägyptischen Pyramide 
weiter, wo andere Todesfällen kniffli¬ 
ge Rätsel aufgeben. 

Ein echtes High-Light 

Bei “Rick Dangerous“ handelt es sich 
um ein Geschicklichkeitsspiel erster 
Güte. An keiner Stelle kommt Frust 
durch schlechte Kollisionsabfragen 
auf. Mit Spielpraxis und Forschungs¬ 
geist sind jede Falle und jedes Hinder¬ 
nis zu meistern. Firebirds neues Pro¬ 
gramm macht süchtig. Da stimmt ein¬ 
fach alles: 

Spielbarkeit, Grafik und Sound. Einzi¬ 
ger Schwachpunkt liegt beim fehlenden 
Scrolling. Zwischen den einzelnen 
Bildschirmen wird etwas ruckartig um¬ 
geschaltet. Das tut der Motivation 
glücklicherweise keinen Abbruch, 
stört aber trotzdem ein bißchen. 



“Rick Dangerous“ zählt zu den besten 
Amstradspielen der letzten Monate. 
Selbst die Dokumentation ist Extra¬ 
klasse: Der Spieler wird durch einen 
farbigen Comic in die Handlung einge¬ 
führt. (Carsten Borgmeier/rs) 
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Gamers Message 


Mit jedem neuen Spiel versuchen die Ersinner von Spielprogrammen die 
Spieler aufs berühmte Glatteis zu führen, und die Spieler ihrerseits lassen 
nicht locker, die von den Machern gestellten Rätsel und Aufgaben in den 
Griff zu bekommen. In diesen Kampf wollen wir auch diesen Monat partei¬ 
isch eingreifen und die Seite der Spieler mit wertvollen Tricks und Kniffen 
beliefern. Von Mogeleien bis zu sachlichen Lösungen finden Sie auch dies¬ 
mal alles auf den folgenden zw ei Seiten. 


Bard’s Tale 

Viele warten bereits sehnsüchtig aut 
das Erscheinen der weiteren 
Bard’s-Tale-Folgen auf dem CPC; und 
das, obwohl noch ebensoviele Aben¬ 
teurer im ersten Teil an der ein oder an¬ 
deren Stelle nicht weiterkommen. All 
denjenigen, die mit der Zeit Schwierig¬ 
keiten mit der Orientierung in den zahl¬ 
reichen Labyrinthen bekommen, soll 
unser kleines Handbuch der Ein- und 
Ausgänge hilfreich sein. 

Von Nach 


Cellars Sewers I 

18 Nord - 7 Ost 

Sewers I Sewers II 

14 Nord - 17 Ost 

Sewers II Sewers III 

11 Nord - 21 Ost 

Sewers III Mangar’s Tower 

16 Nord - 17 Ost 

Catacombs I Catacombs II 

15 Nord - 16 Ost 

Catacombs II Catacombs III 

8 Nord - 11 Ost 

Harkyn I Harkyn II 

19 Nord - 0 Ost 

Harkyn II Harkyn III 

19 Nord - 19 Ost 

Harkyn III Kylearans 

0 Nord - 21 Ost 

Mangar I Mangar II 

13 Nord - 20 Ost 

Mangar II Mangar III 

2 Nord - 11 Ost 

Mangar II Mangar I 

17 Nord - 21 Ost 

Mangar III Mangar IV 

4 Nord - 10 Ost 

Besonderheiten: Um von Harkyn’s 
Castle in Kylearans Tower zu gelan¬ 
gen, reicht es nicht, das angegebene 
Feld zu betreten, im Gegenteil! An je¬ 
ner Stelle befindet sich eine Statue, die, 
setzt man ihr das “eye“ ein, zum Mad 
God wird. Erst wenn dieser besiegt ist, 
wird die Party automatisch in den 
Turm des Kylearan teleportiert. 


Der Weg von Mangar’s Tower I nach 
Mangar’s Tower II ist eine Einbahn¬ 
straße, da man an angegebener Stelle 
nicht auf eine Treppe, einen Aufzug 
oder dergleichen trifft, sondern von ei¬ 
nem Magic Mouth in das nächste Level 
teleportiert wird. Das ist besonders un¬ 
angenehm, da keinerlei Angaben über 
diesen Akt der geheimnisvollen Beför¬ 
derung gemacht werden und sich die 
beiden Trakte in Level I und Level II 
wie ein Zwilling dem anderen gleicht. 
Also: Nach Betreten des ominösen Fel¬ 
des den Orientierungszauber anwen¬ 
den, damit man sich auch weiterhin gut 
zurechtfindet. 

In das vierte Level des düstren Turmes 
gelangt man nur dann, wenn einem 
wissensdurstigen magischen Mund 
richtig geantwortet wird. Die Worte lie 
with passion and be forever danined 
sind in dieser Situation anzuwenden. 

Soweit der kleine Wegweiser durch die 
Schlünde von Skara Brae. Zum Schluß 
noch die Fundorte der drei magischen 
geometrischen Figuren, ohne die man 
im fünften Level von Mangar's Tower 
nicht zum Ziel kommen kann. 

Harkyn's Castle, Level II: 

0 Nord - 0 Ost: Silver Square 

Kyrealans Tower: 

20 Nord - 2 Ost: Silver Triangle 

Mangar’s Tower, Level II: 

15 Nord - 4 Ost: Silver Circle (sofern 
man das Rätsel an dieser Stelle richtig 
beantwortet. Lösung: CIRCLE) 

Driller 

Den in akuter Explosionsgefahr be¬ 
findlichen Mond Mitral hat Markus 
Korb angesteuert und durch gezielte 
Bohrungen vor dem jähen Ende be¬ 
wahrt. Die wichtigsten Hinweise auf 
dem langen Weg zur Rettung des Him¬ 
melskörpers hat er dabei für die ihm 
folgenden Retter notiert. Wir wollen 
sie nicht zurückhalten. 


Amethyst: 

Wird der Würfel im Süden abgeschos¬ 
sen, öffnet sich rechts daneben eine 
Tür. 

Obsidian: 

Die Pyramide links neben der Brücke 
erhöht das Shield, natürlich nur, wenn 
sie abgeschossen wird. Das senkrecht 
stehende Rechteck fällt, wenn ange¬ 
schossen, um und bildet so eine 
Brücke, über die man den Graben über¬ 
queren kann. Im Depot sollten Sie sich 
mit der Schießerei ein wenig ein¬ 
schränken; denn treffen Sie die Lichter 
an der Decke, wird es zwangsläufig 
reichlich duster und das Finden des 
Ausganges wird dadurch erheblich er¬ 
schwert. 

Niccolyte: 

Hier gilt es, möglichst nahe an den bei¬ 
den Blöcken vorbeizufahren, um das 
unangenehme Minenfeld ungeschoren 
zu passieren. Auch sollte der Schalter 
umgelegt werden. 

Lapis Lazuli: 

Schießt man auf den Würfelschalter, so 
verschwindet die Mauer samt Tür. Das 
sollte uns nicht weiter stören, denn fah¬ 
ren wir ein wenig voran und feuern auf 
den Schalter, taucht die Mauer hinter 
uns wieder auf, Problem gelöst. 

Topaz: 

Der Lift zum K2-Komplex wird wie 
folgt benutzt: Man stellt sich auf die 
Plattform und visiert den linken Schal¬ 
ter an, dann geht’s aufwärts. Nach fünf 
gezielten Schüssen auf den Computer 
an der Ostseite erscheint eine Pyrami¬ 
de, die die Energie ein wenig auf¬ 
frischt. 

Hinter dem Computer ist der Eingang 
zum Kl-Komplex versteckt. Dort sind 
vier Blöcke zu sehen, die, schießt man 
sie in der Folge 4-3-2 ab, verschwin¬ 
den. Dieses Verschwinden hat zur Fol¬ 
ge, daß ein Transportnetz von Telepor- 
ten aktiviert wird. 

Beryl: 

Um den Laser vor dem Eingang des 
K3-Komplexes auszuschalten, sind die 
drei Stromleitungen zu vernichten. In¬ 
nerhalb des Gebäudes kann es leicht 
Vorkommen, daß durch ungezähmtes 
Herumschießen die Tür verschwindet. 
Sollte das passieren, so sind die Sym¬ 
bole in die Form Dreieck-Qua- 
drat-Drcieck zu bringen. 
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Quartz: 

Dem Wächter kann man buchstäblich 
den Himmel auf den Kopf fallen lassen, 
worauf sich dieser zur Ruhe begibt und 
das Zeitliche segnet. Dazu ist lediglich 
die Schnur zu zerlegen, die den Ge¬ 
steinsblock hält, unter dem der Wäch¬ 
ter harrt. Wächter weg — Weg frei 
zum Schalter, Umlegen nicht verges- 1 
sen. 

Emerald: 

Der Obelisk ist ein Energie- und 
Shieldspeicher. Auch in diesem Raum 
gilt die alte Devise: Immer an der 
Wand lang! Der Weg zum Malachite 
könnte so beschrieben werden: Knapp 
am Obelisken vorbeifahren, um 45 
Grad schwenken, in die Ecke fahren 
und erneut: immer an der Wand lang. 

Alabaster: 

Trotz einladendem Wasser ist zum 
Schwimmen keine Zeit. Vielmehr soll¬ 
te die linke obere Ecke des Beckens 
fünfmal beschossen werden. Das Was¬ 
ser läuft ab, und eine Treppe wird 
sichtbar. Treppen, die sichtbar wer¬ 
den, sind zum Hinabgehen da. Also, 
nichts wie runter und bohren. 


Graphite: 

Nicht umsonst ist hier ein Weg ange¬ 
legt worden, und obwohl es sich dabei 
nicht unbedingt um einen rechten han¬ 
delt, sollte das Abkommen von diesem 
vermieden werden, da es sonst zu un¬ 
angenehmen Abzügen, das Shield be¬ 
treffend, kommen wird. 

Malachite: 

In den K4-Komplex gelangt man nur 
mit Hilfe des Gleiters. 

Ruby: 

Keine Angst vor schmalen Wegen, mit 
einer gesunden Vorsicht sollte man al¬ 
lerdings schon Vorgehen. Die Wächter 
können einem schon gehörig Paroli 
bieten, daher sollte man sich mit diesen 
nicht anlegen: links liegenlassen. 
Ochre: 

Die beiden Säulen begrenzen ein un¬ 
sichtbares Energiefeld. Es kann mit 
dem Gleiter überflogen werden. Aller¬ 
dings sollte hier eine Mindesthöhe von 
1900 Fuß eingehalten werden. 

Opal: 

Die Wand, die den Eingang zu “Dia¬ 
mond" versperrt, verschwindet, wenn 
man die Schalter von Niccolite, 
Quartz, Alabaster und Opal betätigt. 


Diamond: 

Das auf der Spitze stehende Dreieck er¬ 
höht die Punktezahl und die Energiere¬ 
serven, das andere die Punktezahl und 
das Shield. 

Aquamarine: 

Der nördlichste Hangar kann durch ei¬ 
nen gezielten Schuß geöffnet werden. 
In ihm befindet sich ein Ketargleiter. in 
den man umsteigen kann. 

Der Pfeil der nach Süden zeigt, ist eine 
Finte, der andere weist jedoch auf den 
Eingang nach Ruby hin. 


Zur Karte: Die Zahlen dort haben fol¬ 
gende Bedeutung: 

I Basalt — 2 Beryl — 

3 Quartz — 4 Topaz — 

5 Obsidian — 6 Amethyst — 

7 Niccolite — 8 Lapis Lazuli 
9 Graphite — 10 Emerald — 

II Alabaster - 12 Malachite - 
13 Ochre — 14 Ruby — 

15 Opal — 16 Diamond — 

17 Aquamarine 
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Zeitschriften-Verwaltung 

Bequeme Verwaltung 
von Artikeln 

Da hat man im Laufe der Zeit einige Zeitschriften ge¬ 
sammelt und muß plötzlich einen bestimmten Artikel 
dringend einsehen. Man nimmt also den ersten Stapel 
und findet nichts, man nimmt den zweiten Stapel und 
findet nichts, man nimmt den dritten... 

Diese Unterfangen dauern mitunter sehr lange, zumin¬ 
dest wenn man den Gesetzen des Murphy Glauben 
schenkt. Wir setzen nun dem programmierten Unheil 
eine programmierte Zeitschriftenverwaltung entgegen, 
die dem Chaos Einhalt gebietet. 



Bei der Herstellung dieses Program¬ 
mes wurde bewußt auf den Einsatz des 
Befehls ’INPUT’ verzichtet, wo es 
programmiertechnisch sinnvoll war. 
So ist eine freie Eingabe auf dem Bild¬ 
schirm möglich, was das Eingeben und 
Editieren der Daten erheblich verein¬ 
facht. 

Wie funktioniert nun die auf allen 
CPCs lauffähige Zeitschriftenverwal- 
tung? 

Starten Sie das Programm mit 
RUN“ZV.BAS“. Es erscheinen am 
oberen und unteren Bildschirmrand 
Menüzeilen, die im einzelnen folgen¬ 
des zu bedeuten haben: 

1. Katalog 

Im Diskettenbetrieb wird zuerst über¬ 
prüft, ob sich eine Diskette im Lauf¬ 
werk befindet und ob das Schreib¬ 
schutzloch verschlossen ist. Ist das der 
Fall, so wird der Disketteninhalt ange¬ 
zeigt. Per Tastendruck gelangt man zu¬ 
rück ins Hauptmenü. Bei der Kasset¬ 
tenversion kann der Katalogisiervor¬ 
gang durch zweimaliges Drücken der 
Escapetaste abgebrochen werden. 


2. Einlesen 

Das Einlesen der zu bearbeitenden Da¬ 
ten erfolgt nach üblicher Manier. Wird 
der Name falsch eingetragen, so muß 
die Eingabe korrigiert werden. Sollte 
sich die gewünschte Datei nicht auf 
dem Datenträger befinden, bricht das 
Programm ab, kann aber durch soforti¬ 
ges Drücken des Dezimalpunktes am 
Ziffernblock wieder gestartet werden. 
Durch einfaches Drücken der Return¬ 
taste gelangt man zurück ins Haupt¬ 
menü. 

3. Abspeichern 

Die Handhabung dieses Menüpunktes 
entspricht der des Einlesens. 

4. Löschen 

Auch hier sei auf den Punkt 2 verwie¬ 
sen, der die Vorgehensweise be¬ 
schreibt. 

Im Kassettenbetrieb ist dieser Menü¬ 
punkt nicht funktionsfähig, da auf Kas¬ 
sette keine Dateien gelöscht werden 
können. 

5. Bearbeiten 

Zu Beginn wird Urnen ein Datensatz 
angezeigt. Beispiel: 


Datensatz Nr.: 1 
Schlüssel (0/1): 1 
Zeitschrift: PC Amstrad 
Herausgabedatum: 25.04.89 
Rubrik: Berichte 
Seite: 13 
Text: AMS-Line 

Die einzelnen Teile des Datensatzes: 

— Datensatz Nr. 

Hier wird Ihnen die Nummer des Da¬ 
tensatzes (sie kann zwischen 1 und 200 
liegen) angezeigt. In diesem Feld kön¬ 
nen Sie keine Eingabe tätigen. 

— Schlüssel (0/1) 

Geben Sie die Ziffer T ein, so bedeu¬ 
tet dies, daß der Datensatz belegt ist. 
Andere eingegebenen Zeichen werden 
zur Ziffer ’0’ umgewandelt. Unter dein 
Menüpunkt 'Suchen’ werden nur Da¬ 
tensätze berücksichtigt, die die Ziffer 
’l’ als Schlüssel besitzen. 

— Zeitschrift 

Hier ist der Name der Zeitung einzutra¬ 
gen (max. 10 Zeichen). 

— Herausgabedatum - Seite - Rubrik 
Diese Punkte dürften sich selbst er¬ 
klären. 

— Text 

Ein beliebiger Text kann hier eingege¬ 
ben werden, nach dem später einmal 
gesucht werden soll. Die Länge darf 
maximal 40 Zeichen betragen. 

Die Steuerung erfolgt mittels Pfeilta¬ 
sten. Links und rechts schaltet zwi¬ 
schen den einzelnen Datensätzen um, 
oben und unten zwischen den Teilen 
des aktuellen Datensatzes. 

’COPY’ ermöglicht die Eingabe einer 
Datensatznummer, die dann ange¬ 
sprungen wird. 

’CLR' löscht den gerade angewählten 
Teil des Datensatzes. Das Drücken der 
großen ENTER- oder der RETURN- 
Taste veranlaßt den Computer, in den 
von der Nummer her niedrigsten Da- 



latensatz Kr.: 
Schluss?! (8/1): 
Zeitschrift: 
Rerausgabe-ütue: 

fcfc-ik: 

Seite: 

Text: 


Ü AUSTUM 

11/89 

Prograw 

Progra** Zeitschriften Ueraltung 


y. 

2x£$C 

CU 

m 

EM TOi 


Datenfeld ansteuem 
Datensatz ansteuern 
Direktes Ansteuern eines Datensatzes 
Alle Daten loschen (Sicherheitsabfrage) 

Aktuelles Datenfeld loschen 

Letztes Zeichen m aktuellen Datenfeld löschen 

Zun nächsten freien Datensatz nit de* Schlüssel '0' springe* 


KiT'TSB' gelangen Sie in las Hainbew ! 





Übersichtliche Benut- 
zerführung in einem 
komfortablen Pro¬ 
gramm gebietet dem 
Chaos in Ihren Zeit¬ 
schriftenstapeln Ein¬ 
halt 
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tensatz zu springen, dessen Schlüssel 
’0’ ist. 

Zweimaliges Drücken der Escapetaste 
ermöglicht ein komplettes Löschen al¬ 
ler Daten. Durch TAB gelangt man zu¬ 
rück ins Hauptmenü. 

6.Suchen 

Zuerst können Sie wählen, ob die Aus¬ 
gabe auf den Drucker oder den Bild¬ 
schirm geschickt werden soll. Ent¬ 
scheiden Sie sich für den Drucker, so 
werden Sie darauf hingewiesen, daß 
sich selbiger auch in eingeschaltetem 
Zustand befinden muß. Ist das nicht der 
Fall, so werden die Daten auf dem 
Bildschirm ausgegeben. Nach der 
Wahl der einzelnen Datenbereiche, die 


Sie später einsehen wollen, können Sie 
das Such wort bestimmen, nach dem 
ZV die Datensätze durchsucht. 

Groß- und Kleinschreibung wird nicht 
berücksichtigt. Alle Datensätze, deren 
Schlüssel ’ 1 ’ ist, werden in die Suche 
einbezogen. 

7. Farben\vahl 

Dieser Punkt dient zur individuellen 
Gestaltung der Arbeitsoberfläche. 

8. Invertieren 

Der Bildschirm läßt sich hier invertie¬ 
ren. Die Schreibfarbe wird zur Hinter¬ 
grundfarbe und umgekehrt. 

9. Uhrzeit 

Zu Beginn der Arbeit mit diesem Pro¬ 
gramm müssen Sie natürlich die Uhr¬ 


zeit eingeben. Durch Betätigung der 
Taste '9' erscheint nach erstmaligem 
Stellen die genaue Uhrzeit auf dem 
Monitor. 

10. Programmende 

Bevor Sie endgültig das Programm 
verlassen, wird noch eine Sicherheits¬ 
abfrage gemacht. 

11. Pause 

Dieser Menüpunkt hat den Sinn, den 
Monitor zu schonen, besonders, wenn 
die Hintergrundfarbe sehr hell ist. 
Nach Tastendruck gelangen Sie zurück 
ins Hauptmenü. 

(Bernd Hartenberger/jf) 


für 464-664-6128 
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1 **************************** 

* Zeitschriften-Verwaltung * 

* Ein Programm von * 

1 * Bernd Hartenberger * 

1 * * 

1 **************************** 

• ******************** 

* Deutsche Umlaute * 
******************** 

SYMBOL AFTER 91 

SYMBOL 91,195,60,102,102,126,102,102, 

SYMBOL 92,195,60,102,102,102,102,60,0 
SYMBOL 93,102,0,102,102,102,102,60,0 
SYMBOL 123,102,0,120.12,124,204,118,0 
SYMBOL 124,102,0,60,102,102,102,60,0 
SYMBOL 125,102,0,102,102,102,102,62,0 
SYMBOL 126,60,102,102,124,102,102,124 


1180 1 ****************** 

1190 1 * Key-Definition * 

1200 1 ****************** 

1210 KEY DEF 17,1,125,93:KEY DEF 19,1,123, 
91 

1220 KEY DEF 22,1,124,92:KEY DEF 26,1,124, 
92,64 

1230 KEY DEF 24,1,126,94,0:KEY DEF 66,0,0, 
0 


[1164] 
[2114] 
[ 1214] 
[ 363 ] 
[990 ] 
[1164] 
[117] 
[665 ] 
[582] 
[665] 
[1213] 
[2015] 

[2188] 
[2333] 
[2673] 
[ 2072 ] 
[2418 ] 
[2862] 

[659] 

[69] 

[659] 

[1630] 

[1099] 

[2789] 


c 


1240 KEY 138,"c1 osein:closeout:goto 1570" + 
CHR$(13) 

1250 1 ******************* 

1260 1 * Initia1isierung * 

1270 1 ******************* 

1280 OPENOUT"dummy":MEMORY HIMEM-1:CLOSEOU 
T 

1290 SPEED WRITE 1 : datei$ = STR ING$(12, "-"); 
uh r = 0 

1300 DIM dat$(200):dat=200:invert=0:ausgab 
e = 0 

1310 farbe0=0:farbel=26:contro1=PEEK(&BC77 

) 

1320 IF control= &DF THEN FOR a=l TO 4300:N 
EXT 

1330 ’ ******************** 

1340 1 * Bildschirmaufbau * 

1350 ’ ******************** 

1360 MODE 2:INK 0,farbe0:INK 1,farbe1:BORD 
ER farbeO 

1370 WINDOWÜO,2,79,4,22:PAPER#0,0:PEN#0,1 


[3030] 

[ 669 ] 
[941] 

[ 669 ] 
[2303] 

[3886] 

[ 1249 ] 

[1607] 

[2134] 

[665] 
[1166] 
[ 665 ] 
[3108] 

[2446] 


1380 WIND0WÜ1,1,80,1,1:PAPERÜl,1:PEN#1,0:C [2020] 
LS# 1 

1390 WIN DOW# 2, 1,80,25,25:PAPER#2, 1:PEN#2,0 [2569 ] 
:C LS# 2 

1400 WIN DOW #3,3,25,2,2:PAPER#3,0:PEN#3, 1 [ 1630 ] 

1410 WIND0W#4,28,59,2,2:PAPER#4,0:PEN#4,1 [2108] 

1420 WIND0W#5,66,78,2,2:PAPER#5,0:PEN#5,1 [2394] 


Lisllng ZV 


Listing ZV 


BRANDHEISSE KNÜLLERPREISE 


8cbn»ld«r 

Towor AT 22(1 mit MoMor MM 12 

mit Cotormoiütor CM 14 
mit EGA-Monltor EM 14 
Townr AT 260 mH EGA-Monitor EM 14 

mit Mu1t«sc«n-Mon. MS 14 

Amatrftd 

20 MB-Fllecard fSoapMa, 40 ms Zuontfc- 
«il. oinbau und »nschluöfortlg für oUo 
PC 1512 und PC 16401 
30 MB-Fi«ocard |S<iog»tft 40 mt) 

40 MB Fitocsfd {Westum D»gital.29 ms) 

60 MB-Fllecard (Sooyatn, 40 ms| 

PC 1840 mit 2 IW » F.locard 20 MB 

Monochrommonltor 2249, - 

Cotomxmitoi 2599. - 

EGA-Monitor 3049. 

PC20WJDD12MD 234* . DD 14 CD 

DD 12 HRCD 3M* -: DD 14 HRCD 

PC 20B8 HD 12 MD 274* : HD 14 CO 

HD 12 HRCD 344* .; HD 14 HRCD 

PC 2208 HD 12 MD 393*-. MD 14 CD 

HD 12 HRCO 472* - ; MD 14 HRCD 

PC 2386 HD 12 MD 664*- HD 14 CD 

MD 12 HRCD 7349. -; MD 14 HRCD 

PC 1640 SD mit Schwarrtveißmonitor 
mit Colormonitor 

PC 1640 DD ml« SchwarrweifSmonitor 
mit EGA-Monitor 

PC 1640 HD 20 mit SchwarzweuSlntonltor 
mit EGA-Monitor 


2949.- 

3299. 

3699.- 

524* - 
5749. 


1099. 

30 MB 

234*- 

269*- 

314*- 

269*- 

339*- 

3099.- 

379* - 

437*- 

5079, - 

699* 

7699.- 

1449 

1799,- 
1619, - 
239* 
704*- 
284* - 


EGA-Monltor für PC 1640 1199.- 

EGA-Monitor ♦ EGA Kurt© dir PC 1512 1499. - 

Portnblo Computer PPC 512 D 164* 

Joyce PCW 9512 mit TVponroddruck*« 144* - 

Epvondrucker (dt. Handbüchar, mit FTZ] 

AnnchtußfnniQ an AMIGA. Schnnidor PC, 

Aton SI Oder Mene, IBM Kompatibl© 

LX 400 44* - 

LQ400 710 . 

IQ 550 91*- 

LQ850 14*9. - 

SUrdruckor (dt. Handbücher, mit FTZ] 

LC-10 mit Centfonicslnterlaco 44* 

LC-10 Color Farbdruckflr mit Contronlc« 69* - 

LC-24-10 mit ContromcBlnterfac« 678, - 

NEC-Drucker (dt. Meodböcher, mit FTZ» 

NEC P 7 Plus 1799.- : P53O0 159*- 

NECPÖP'ais 1399.-; Farboption 27*- 

Elnzelblettointuo für NEC P 6 Plus 44* - 

Super knüllor 

Commodore AT PC 30-111 mit Monitor 2899. 

Epson Tmtanotrahldruckor IX HOO1240 Z.Sek | 649. - 

24’Nadnfdrucker LQ 3500 + Druckorkobol 52*- 

VorsondkoetonpauschaJ« (Wuromvnrl bis OM 1000. - .'datüberl: 
Vorauskesee (DM * - <70, ). Nachnohmo iDM 12.5074,50», Aos- 
latKl |DM 20, /5* - |. llofamng nur gugnn NN ador Vorouskasae 
Ausland nur Voreuskess« 

Prelaliete (Computortyp angobnnj pegen Zusendung omos Fr©*- 
umachlaga. Putisn g*ut, 0 91089 


CSV Riegert FAX (0 71 61 ) 1 35 87 

Schloßhofstr. 5, 7324 Rechberghausen, Tel. (0 71 61) 5 28 89 







>termdriue D i sket t enstat 

onen 




CPC . Jouce«Eur o-PC.Rm- 

/ 12 Monate \ 


strad 1512,1640,2086 

/ Garantie \ 




Externe Laufwerke -Prof 1 desigrv-internes Netzteil 
bedienungsfreundllch-sehr leiser Lauf 

CPC 5.25" 820 kB volIkompatlbei zu Basic,CPM 2.2 

fl 

=> o 




bar auf 180 KB/Seite incl.Seitenunschalter u.Software 

CM:30900 

Jogce 5.25" 720 KB,problemlos u. schnell anschließbar m 

t finleitung 

wie ein eingebautes 3" B - Laufwerk zu betreiben 


DM:299.00 

Unschalter f. Teamdr 1 vecopg 80/H0 Spuren 


DM: 20.00 

Spezialkabel f.Jogce plus C8512) mit Umschalter B-Intern 3" zu 

B-Extern 5.25" 


DM: 30.00 

Ibamdrivecopy CPM-MS-DOS Disk.-Kopierprg. f. 360/720 kB 

DM: 59.00 

Spelcheraufrilstung für Joyce 512 kB 


DM: 130.00 

Preise zz gl. Porto u. Verpackung, Versand p. Nachnahme, Liste kostenlos 

Krebs electronic Datentechnik-Hard- u. Software. 6751 Weilerbach 

Tbl. 063 74-68 78, BTX 063744432 
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Programm 


4=L|sehen 5=Bearbe1ten 
7=Farbenwahl 8=Invertier 
0=Programmende Entertas 
,V. "+CHR$(164)+"1989" 


1620 IF a$= 
1630 IF a$= 
1640 IF a$= 
1650 IF a$= 
1660 IF a$= 
1670 IF a$= 
1680 IF a$="8 
1690 IF a$=" 9 
1700 IF a$= 


1440 PLOT 0,0,1:DRAW 0,399:PLOT 1,0:DRAW 1 
, 399 

1450 PLOT 639,0:DRAW 639,399:PLOT 638,0:DR 
AW 638,399 

1460 PLOT 0,366:DRAW 639,366:PLOT 0,32:ORA 
W 639,32 

1470 PLOT 199,366:DRAW 199,382:PL0T 200,36 
6:DRAW 200,382 

1480 PLOT 479,366:DRAW 479,382:PL0T 480,36 
6:DRAW 480,382 

1490 PRI NT #1," 1 = Kata1og 2=Einlesen 3 

= Abspeiehern" ; 

1500 PR I NT# 1 , " 

6=Suchen” 

1510 PR I NT#2, " 
en 9=Uhrzeit" 

1520 PRINT# 2 , " 
te=Pause" 

1530 PRINT#5, " Z 
1540 ' ************** 

1550 ' * Hauptmenue * 

1560 ' ************** 

1570 a=0:b=0:CLS#0:PRINT#6,TAB(20)+"Bitte 
w{h1en Sie einen Menjpunkt aus !" 

1580 PRINT#3,"Freie Datens { tze : " ; dat 
1590 P RIN T # 4 ,"Eingelesene Datei: ";datei$ 
1600 a$=INKEY$:IF a$="" THEN a=a+l:IF a>99 
00 THEN GOTO 3220 ELSE GOTO 1600 
1610 IF a$= " 1" THEN GOTO 1760 
THEN GOTO 1840 
THEN GOTO 1920 
THEN GOTO 1980 
THEN GOTO 2040 
THEN GOTO 2550 
THEN GOTO 2740 
THEN GOTO 2830 
THEN GOTO 2880 
THEN GOTO 3140 
1710 IF NOT INKEY(6) THEN GOTO 3220 
1720 SOUND 1,100,10,15:a=0:GOTO 1600 
1730 ' *********** 

1740 ' * Katalog * 

1750 ‘ *********** 

1760 CLS#6:IF control=&DF THEN GOSUB 3790: 
GOTO 1780 

1770 PRINT#6 ,TAB( 15) +"Mi t 2xESC U"t sich 
das Katalogisieren abbrechen." 

1780 CAT:IF control<>&DF THEN GOTO 1570 
1790 FOR a=1 TO 4300:NEXT:PRI NT#6,TAB(24) + 
"Bitte drjeken Sie eine Taste !" 

1800 CALL &BB06:GOTO 1570 
1810 ' ************ 

1820 ' * Einlesen * 

1830 ‘ ************ 

1840 GOSUB 3890:IF a$="" THEN GOTO 1570 

1850 OPENIN a$:FOR a=l TO 200:LINE INPUT#9 

, dat$(a):NEXT:CLOSEIN 

1860 datei$=a$:b=0:FOR a=1 TO 200 

1870 IF LEFT$(dat$(a),1)="1" THEN b=b+l 

1880 NEXT:dat=200-b:GOTO 1570 

1890 ' *************** 

1900 ' * Abspeichern * 

1910 ' *************** 

1920 GOSUB 3890:IF a$= M " THEN GOTO 1570 
1930 OPENOUT a$:FOR a=l TO 200:PRINT#9,dat 
$(a):NEXT:CLOSEOUT 

1940 IF cont rol=&DF THEN FOR a=l TO 4300:N 
EXT:GOT 0 1570:ELSE GOTO 1570 
1950 ' ************ 

1960 ' * Loeschen * 

1970 ' ************ 

1980 IF controlO&DF THEN GOTO 1570 
1990 GOSUB 389 0: IF a$='"' THEN GOTO 1570 
2000 
70 

2010 
2020 
2030 


!ERA,@a$:FOR a=l TO 4300:NEXT:GOTO 15 


2040 PRINT 
el (0/1):" 


Listing ZV 


************** 

* Bearbeiten * 
************** 

Datensatz Nr.: 


:PRINT" Schl)ss 


[3371] 

[3366 ] 

[3153] 

[1661 ] 
[445] 

[ 567] 
[445] 
[6520] 

[2015] 

[ 2791 ] 
[3257] 

[ 1324 ] 

[831] 

[1497] 

[ 1670] 

[ 1448] 

[791] 

[1914] 

[ 1771 ] 
[1783] 

[ 1284] 

[ 1556 ] 
[1758] 

[ 332] 
[342] 

[ 332 ] 

[3064] 

[4636] 

[1599] 
[4551] 

[ 1121 ] 

[ 502 ] 

[ 648] 

[ 502 ] 
[2675] 
[2658 ] 

[1181 ] 

[1960] 
[958] 

[ 345 ] 

[ 1098] 
[345 ] 
[2675] 
[2745] 

[3842] 

[502] 
[441] 
[502 ] 

[1401] 
[2675] 
[1977] 

[ 445 ] 
[393] 
[445] 

[3485] 


Zeitschrift:":PRINT" Herausgab 
Rubrik:":PRINT" Seite:":PRI NT" 
;CHR$(241 


2050 PRINT 
edatum:" 

2060 PRINT 
Text:" 

2070 PRINT:PRINT" ";CHR$(240); 

)" = Datenfeld ansteuern" 

2080 PRINT" ";CHR$(242);" ”;CHR$(243); 

= Datensatz ansteuern" 

2090 PRINT" COPY 
es Datensatzes" 

2100 PRINT" 2 x E SC 
cherheitsabfrage) 

2110 PRINT" C LR 
sehen" 

2120 PRINT" DEL 


Direktes Ansteuern ein 
Alle Daten 1!sehen (Si 
Aktuelles Datenfeld 1! 


[4031] 

[3354] 
[3809] 
[3882 ] 
[ 3233 ] 
[4615] 
[4150] 
[7126] 
[6786] 
[4782] 
[ 2961 ] 
[4009] 


Letztes Zeichen im akt 
uellen Datenfeld Tischen" 

2130 PRINT" ENTER = Zum n{chsten freien Da 
tensatz mit dem Schl}sse1 '0' springen" 

2140 PRINT#6,TAB(19)+"Mit 'TAB' gelangen S 
ie in das Hauptmen} !" 

2150 a=0:b=l:d=l:WINDOW#5,20,79,4,10:WINDO 
W#7,77,77,4,4 

2160 a=a+l:IF a=201 THEN a=l:GOTO 2180:ELS 
E GOTO 2180 

2170 a=a-1:IF a=0 THEN a=200 [1739] 

2180 schl$=LEFT$(dat$(a),1):name$=MID$(dat [3100] 
$(a),2,10) 

2190 hera$=MID$(dat$(a) , 12,8) : rubr$=MID$(d [3560] 
at$(a), 20 , 10 ) 

2200 seit$=MID$(dat$(a),30,3):text$=MID$(d [3363] 
at$(a) ,33,40) 

2210 IF sch1$<>"l" THEN sch1$="0":f=0:ELSE [2255] 
f = l 

2220 GOSUB 3290 [1198] 

2230 a$=INKEY$:IF a$="" THEN GOTO 2230 [1978] 

2240 IF NOT INKEY(O) THEN b=b-l:IF b=0 THE [4816] 
N b= 6:GOSUB 3290:GOTO 2230:ELSE GOSUB 3290 
:GOT 0 2230 

2250 IF NOT INKEY(2) THEN b=b+l:IF b=7 THE [4422] 
N b=l:GOSUB 3290:GOTO 2230:ELSE GOSUB 3290 
:GOTO 2230 

2260 IF NOT INKEY(8) THEN GOSUB 3480:CLS#5 [2099] 
:GOTO 2170 

2270 IF NOT INKEY(1) THEN GOSUB 3480:CLS#5 [1718] 

:GOT 0 2160 

2280 IF NOT INKEY(68) THEN GOSUB 3480:GOTO [2057] 
1570 

2290 IF NOT INKEY(79) THEN GOSUB 3610:GOTO [1752] 
2230 

2300 IF NOT INKEY(16) THEN a$="":GOTO 2390 [1342] 
2310 IF NOT INKEY(9) THEN GOSUB 3480:G0SUB [2086] 
3720:CLS#5:GOTO 2180 

2320 IF NOT INKEY(IS) THEN GOSUB 34B0:CLS# [2984] 

5:GOSUB 4230:G0T0 2180 

2330 IF NOT INKEY(66) THEN GOSUB 3480:G0SU [4140] 
B 4300:CLS#5:GOTO 2180 


2340 

IF 

a$=CHR$(13) THEN GOTO 

2230 

[ 1229 ] 

2350 

IF 

a$ = 

THEN GOTO 2380 



[1742] 

2360 

IF 

a$=CHR$(34) THEN GOTO 

2230 

[1306] 

2370 

IF 

ASC(a$)>125 THEN GOTO 

2230 

[1276] 

2380 

IF 

d = 0 

THEN 

GOTO 2450 



[960] 

2390 

IF 

b= 1 

THEN 

CLS# 7:sch 1 $ = 

" 

d = 0 

[1746] 

2400 

IF 

b=2 

THEN 

CLS# 7:name$ = 

" 

d = 0 

[951] 

2410 

IF 

b= 3 

THEN 

CLS#7:he ra$ = 

" 

d = 0 

[ 1566] 

2420 

IF 

b= 4 

THEN 

CLS# 7:ru b r$= 

• •• 

d = 0 

I1668] 

2430 

IF 

b= 5 

THEN 

CLS# 7:seit$ = 

. •• 

d = 0 

[3240] 

2440 

IF 

b= 6 

THEN 

CLS# 7:text$ = 

1 II 

d = 0 

[1345] 

2450 

IF 

b= 1 

THEN 

IF LEN(schl$)<l THEN 

sch) [4747] 


$=schl$+a$:PRINT#7,schl$ 

2460 IF b=2 THEN IF LEN(name$)<10 THEN nam [3873] 
e$=name$+a$:PRINT#7,name$ 

2470 IF b= 3 THEN IF LEN(hera$)<8 THEN hera 
$=hera$+a$:PRINT#7,hera$ 

2480 IF b=4 THEN IF LEN(rubr$)<10 THEN rub 
r$=rubr$+a$:PRINT#7,rubr$ 

2490 IF b= 5 THEN IF LEN(seit$)<3 THEN seit 
$=seit$+a$:PRINT#7,seit$ 

2500 IF b=6 THEN IF LEN(text$)<40 THEN tex 
t$=text$+a$:PRINT#7,text$ 

2510 GOTO 2230 [309] 

2520 ' ********** [315] 

[594] 


[3281] 
[ 3229 ] 
[4061] 
[2969] 


2530 


Listing ZV 


Suchen 
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Programm—i 


2540 • ********** [315] 

2550 PRINT#6,TAB(5)+"Ausgabe der gefundene [6379] 
n Daten auf dem Bildschirm oder Drucker (B 
/D) ?":a=0:b=0 

2560 a$=UPPER$(INKEY$):IF a$="" THEN GOTO [2411] 


2560 

2570 IF a$="B" THEN a=0:GOTO 2610 [1049] 
2580 IF a$="D" THEN a=8:GOTO 2610 [1714] 
2590 IF a$=CHR$(13) THEN GOTO 1570 [1383] 
2600 SOUND 1,100,10,15:GOTO 2560 [1937] 


2610 IF a = 8 THEN IF I NP(&F500)=90 THEN PRI [ 6221] 
NT#6,TAB(20)+"Bitte schalten Sie Ihren Dru 
cker ein !":ELSE GOTO 2630 

2620 IF a= 8 THEN CALL &BB06:IF INP(&F500)= [ 2673] 
90 THEN a=0 


2630 GOSUB 4420 [837] 

2640 b=0:INPUTS6,"Bitte geben Sie das Such [4128] 
wort ein: " ,a$:a$=UPPER$(a$) 

2650 IF a$="" THEN GOTO 1570 [978] 

2660 CLS#6:FOR b=l TO 200 [1496] 

2670 IF LEFT$(dat$(b) ,1) = "1" THEN IF IN STR [ 5545 ] 
(UPPER$(dat$(b)) ,a$)< >0 THEN GOSUB 4000:GO 
TO 2690 

2680 GOTO 2700 [399] 

2690 IF a = 0 THEN PR I NT#6,TAB(24) + "B111e dr [6681] 
)c ken Sie eine Taste !":CALL &BB06:CLS#6 : C 
LS#0 

2700 NEXT :GOTO 1570 [1069] 

2710 1 ************** [445] 

2720 ' * Farbenwahl * [1354] 

2730 1 ************** [445] 

2740 INPUT#6, "Farbwert f}r pen (0-26): " , f [ 3003] 
a r be 1 

2750 IF f a r be1< 0 OR farbel>26 THEN GOTO 27 [ 1 723 ] 
40 

2760 INPUT#6,"Farbwert f)r paper (0-26): " [3345] 

,fa rbeO 

2770 IF farbe0< 0 OR farbe0>26 THEN GOTO 27 [ 1886] 
60 

2780 IF farbeO=farbel THEN GOTO 2740 [1987] 

2790 INK 0,farbe0:INK 1,farbel:BORDER färb [2329] 
e0:invert=0:GOTO 1570 

2800 ' *************** [345] 

2810 ' * Invertieren * [1158] 

2020 ' *************** [345] 


2830 IF 1nvert=0 THEN INK 0,farbel:INK l,f [2554] 
a rbeO:BORDER färbe 1:invert=l:GOTO 1570 
2840 IF inv e r t=1 THEN INK 0,farbe0:INK l,f [3642 ] 
arbel:BORDER farbeO:invert=0:GOTO 1570 


2850 ’ *********** [332] 

2860 ' * Uhrzeit * [1266] 

2870 ' *********** [332] 

2880 CLS#6: IF uhr = l THEN GOTO 2970 [ 1492] 


2890 INPUT#6,"Stunden ( 1 - 12 ): ”,st:IF st>l [3658] 
2 OR st<1 THEN GOTO 2890 

2900 INPUTÜ6,"Minuten (0-59): ",mn:IF mn>5 [3804] 

9 OR mn < 0 THEN GOTO 2900 

2910 PRINT#6,"Stimmen Ihre Eingaben (j/n) [5304] 


Llsting ZV 


? Stundenst;" Minuten;mn 

2920 a$=LOWER$(INKEY$):IF a$="" THEN GOTO [1858] 
2920 

2930 IF a$= "j" THEN GOTO 2960 [1566] 

2940 IF a$="n" THEN GOTO 2890 [1167] 

2950 SOUND 1,100,10,15:GOTO 2920 [1835] 

2960 EVERY 3000,0 GOSUB 4170:uhr=l [737] 

2970 zl=(360/60*mn)+270:zl=zl-(zl*2):z2=(3 [4755] 
60 / 12 *st)+(30/(60/(mn+0. 1 )))+270 

2980 z2=z2-(z2*2) [1035] 


2990 DEG:PLOT 320,200:DRAW 320+ 100*COS(z 1 ) [4003] 
,200+100# SIN(zl) 

3000 PLOT 321,200:DRAW 321+100*COS(z1),200 [1930] 
+100*SIN(zl) 

3010 PLOT 320,200:DRAW 320+60*COS(z2),200+ [2069] 
60*SIN(z2) 

3020 PLOT 321,200:DRAW 321+60*COS(z2),200+ [2134] 
60*SIN(z2) 

3030 FOR a=1 TO 2:FOR b=0 TO 360 STEP 30 [2065] 

3040 PLOT 320 + a+ 120*COS(b) ,200+120*SIN(b) [ 1260 ] 

3050 DRAW 320+a+140*COS(b),200+140*SIN(b): [3444] 
NEXT:NEXT 

3060 PRINT#6,TAB(6)+"Bitte dr]cken Sie 'SP [5307] 
ACE' (=Hauptmen}) oder 'TAB' ( = Uhr stellen 
) i" 


3070 a$ = INKEY$:IF a$="" THEN GOTO 3070 [ 1907] 

3080 IF NOT INKEY(47) THEN GOTO 1570 [1428] 

3090 IF NOT INKEY(68) THEN CLS#0:uhr=0:GOT [2193] 

O 2880 

3100 SOUND 1,100,10,15:GOTO 3070 [1843] 

3110 ' **************** [528] 

3120 1 * Programmende * [1201] 

3130 ’ **************** [520 ] 

3140 PR INT#6,TAB(27) + "Prog ramm beenden (j/ [ 2546 ] 

n) ?" 

3150 a$=LOWER$(INKEY$):IF a$="" THEN GOTO [1909] 
3150 

3160 IF a$ =" j" THEN !BASIC [ 1209] 

3170 IF a$="n" THEN GOTO 1570 [1102] 

3180 SOUND 1 ,100,10,15:GOTO 3150 [ 1899 ] 

3190 ' ********* [418] 

3200 ' * Pause * [47] 

3210 ' ********* [4 18] 

3220 MODE 2:INK 0,0:INK l,26:BORDER 0 [3485] 

3230 PRINT"Zeitschriften-Verwaltung" [4369] 

3240 PRINT"Pause":PRINT"Bitte drlcken Sie [3435] 
eine Taste !" 

3250 CALL &BB06:1nvert=0:GOTO 1360 [1446] 

3260 ' *************** [345] 

3270 ' * SUB Anzeige * [235] 

3280 ' *************** [345] 

3290 PAPER# 7,0:IF b=1 THEN C = 1 [ 1 774 ] 

3300 IF b=2 THEN c=10 [561] 

3310 IF b=3 THEN c=10 [701] 

3320 IF b=3 THEN c=8 [783] 

3330 IF b=4 THEN c=10 [619] 

3340 IF b=5 THEN c=3 [1327] 

3350 IF b=6 THEN c=40 [489] 


Listing ZV 



mpulerslore 


Hochstraße 11 
8500 Nürnberg 80 
Tel.: 0911 / 28 90 28 


COMPUTER - 



liivce PCW 8256. kcj'npl. lextsvslem, neu, nur 




TOWER AI 20t. mir Imerleave 1 l Controller 


Star LC 24-10 


u, 40 MB NEC-Fbstplfltle IBencli-lest: 18msi 




PC1640S0‘MD • 40MB Festol. - TextproQuimn« 


1998. - NEC P 6 Plus 

1448,- 

PC XT/AT ZUBEHÖR 


CPCZUBEHOR 


Mathe-Co-Prozessor 808/ 8 MHz 

2 OB. 

Laufwerk DOM 


80287 tO MHZ 

53B, 

Zweitlaufwerk FD 1 

269- 

RAM Erweiterung PC 1512 auf 640 K0 

118. 

Serielle Schnittstelle 


rOWER AT auf 1 MR 

130. 



F leearri auch für 1512/1640 20 MB 

648. 



30 MR 

748. 

CPC/JOYCE -ZUBEHÖR: 


Zwe Haufwerk 1512/1640 5.25" 360 KB 

178. 



TOWER AT 3,5” 1.44MB 

298. 

Maxell 3" Disk, 10 St 


Externes Zweitlaufwerk für XT und 




PC 1612/1640 3,5" 720 KU 

348. 



Genius Mause GM 0 Plus, dt. VeiS'Ori 

84. 



GM 6000, dt. Version 

98. 

JOYCE-ZUBEHÖR 


Stiper Mousev 3 Tasten, MS-Mou&e kompatibu 1 

68, 



Qus Mouse für Sr.nn«>dei Computer 

74. 

RAM E'wellerung auf 512 KR 

118. 


Wir führen ni den Original-SCHNEIDER-Produkten Artikel verschiedener Firmen wie VORTEX, STAR-DIVISION, 
DATA BECKER, PROFISOFT, ARIOLA, RUSHWARE, MARKT & TECHNIK. SYBEX, GFA. GERDES, STAR 
SCHNEIDER DATA, ABD, SOFTMAKER usw.l 


Floppy s kauft man beim Spezialist fü r Diskettenlaufw erke: 


G+L-Weihnachtstip: STARDRIVE- Floppy'sfür Ihren CPC 


• STARDRIVE 5.25 External Disk Orlve als Zweitlaufwerk 
(in H. 10/88 als sehr empfehlenswert golestet) 

• STARDRIVE 5.25 External Disk Drive als Erstlaufwerk 

• STARDRIVE 5.25 EDD u. 3"-Dlsk Drive als Doppellaulwerk 
(in H 5/89 als prima getestet) 

• STARDRIVE 3,5"-TEAC-Zweltlaufwerk In 720 KB Ausführg. 
(in H. 10/89 als sehr leise getestel) 

• STARDRIVE 5,25"-TEAC-Zweitlaufwerk in 720 KB Ausführg. 
(In H. 10/89 als komfortabel getestel) 


nur DM 298,- 

nur DM 498,- 
nur DM 698,- 

nur DM 298.- 

nur DM348,- 


Weitere Vorteile: 

- 12 Monate G+L-Vollgaramle - inkl, Betriebsanleitung/Handbuch 

- sofortige Betriebsbereitschalt - integr. Dlskettenseitenumschalter 

- alle Kabel Im Lieferumfang enthalten - formschönes Flachgehäuse 

Weitere Angebote (z.B, Laufwerke f, EURO-PC) entnehmen Sie bitte unseren Prospekten/ Listen 
(inkl. techn. Daten), die wir Ihnen gerne kostenlos zuschicken. 

Preis zzgl, Porto/Verpackung, Bitte Rechnertyp CPC 464/664 o. 6128 angebenl 


G + L electronic 

Computerhardware 
6759 Hefersweiler • Seelenerstraße 4 • Tel: 06359/2582 
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[—Programm 


3360 LOCATE 18,1:PRINT a:CLS#7:d=1:GOTO 33 
80 

3370 WINDOW#7,20,20+C,b+4,b+4:PAPER#7,1:PE 
N#7,0:CLS#7:RETURN 

3380 IF b < > 6 THEN LOCATE 19,7:PRINT text$ 
ELSE GOSUB 3370:PRI NT#7,text$ 

3390 IF b< > 5 THEN LOCATE 19,6:PRINT seit$ 
ELSE GOSUB 33 70:PRI NT#7,se1t$ 

3400 IF b< >4 THEN LOCATE 19,5:PRINT rubr$ 
ELSE GOSUB 3370:PR I NT#7, rubr$ 

3410 IF b< > 3 THEN LOCATE 19,4:PRINT hera$ 
ELSE GOSUB 3370:PRINT#7,hera$ 

3420 IF b < > 2 THEN LOCATE 19,3:PRINT name$ 
ELSE GOSUB 33 70:PRINT#7,name$ 

3430 IF bOl THEN LOCATE 19,2:PRINT schl$ 
ELSE GOSUB 3 370:PRINT#7,sch1 $ 

3440 RETURN 

3450 ' ***************** 

3460 ' * SUB Abschluss * 

3470 ' ***************** 

3480 IF sch1$="" THEN schl$=" 

3490 e=10-LEN(name$):name$=name$+STRING$(e 
3500 ^e= 8 -LEN(hera$):hera$=hera$+STRING$(e, 

3510 e=10-LEN(rubr$):rubr$=rubr$+STRING$(e 

3520 e=3-LEN(seit$):seit$=seit$+STRING$(e, 

35 30 e = 4 0-LEN(text$) : tex t$ = te x t$ + STR'l NG$ ( e 

3540 dat$(a)=schl$+name$+hera$+rubr$+seit$ 

+text$ 

3550 IF f=0 AND schl$="l" THEN dat=dat-l 
3560 IF f=l AND schl$<>"l" THEN dat=dat+1 
3570 PRINT#3,"Freie Datens{tze:";dat:RETUR 
N 

3530 ‘ *********** 

3590 ' * SUB Del * 

3600 ' *********** 

3610 IF d=1 THEN GOTO 3680 

3620 IF b=1 THEN e = LEN(sch1 $) :IF e>0 THEN 
schl$=LEFT$(schl$,e-1):PRINT#7,schl$ 

3630 IF b=2 THEN e=LEN(name$):IF e>0 THEN 
name$=LEFT$(name$,e-1):PRINT#7,name$ 

3640 IF b=3 THEN e = LEN(hera$) : I F e>0 THEN 
hera$=LEFT$(hera$,e-1):PRINT#7,hera$ 

3650 IF b=4 THEN e=LEN(rubr$>:IF e>0 THEN 
rubr$ = LEFT$(rubr$,e-l):PRI NT#7,rubr$ 

3660 IF b=5 THEN e=LEN(seit$);IF e>0 THEN 
seit$=LEFT$(seit$,e-l):PRINT#7,seit$ 

3670 IF b=6 THEN e=LEN(text$):IF e>0 THEN 
text$=LEFT$(textS,e-1):PRINT#7,text$ 

3680 RETURN 

3690 ' ********************* 

3700 ' * SUB Direktauswahl * 

3710 ' ********************* 

3720 INPUT#6,"Bitte geben Sie die Nummer d 

er Datei ein (1-200): ",a 

3730 IF a>200 OR a<l THEN GOTO 3720 

3740 a=INT(a):PRINT#6,TAB(19)+"Mit <TAB> g 

elangen Sie in das Hauptmen} !" 

3750 RETURN 

3 76 0 ' ***************************** 

3770 ' * SUB Laufwerkstatusabfrage * 

3780 ' ***************************** 

3790 OUT(&FA7E),1:FOR a=1 TO 1000:NEXT:OUT 
( 8.FB7F ) , 4 

3800 OUT(&FB7F) , (-PEEK(&A700 ) +2 ) :abf = INP(& 
FB7F) :OUT(&F A 7E) ,0 
3810 abf rage = abf AND 32 

3820 IF abfrage=0 THEN PRINT#6,TAB(14)+ Bi 
tte legen Sie eine Diskette in das Laufwer 
k ein !":CALL &BB06:CLS#6:GOTO 3790 
3830 abfrage=abf AND 64 

3840 IF abfrage=64 THEN PRI NT#6,TAB(12)+ B 
i tte entfernen Sie den Schreibschutz an de 
r Diskette !”:CALL &BB06:CLS#6:GOTO 3790 
3850 RETURN 

3060 ' *************** 

3870 ' * SUB Eingabe * 

3880 ' *************** 

3890 CLS#6:IF control=&DF THEN GOSUB 3790: 


Listing ZV 


[ 555] 

[ 670] 
[565] 

[ 670] 

[ 1719 ] 
[2362] 



[ 2621 ] 
[ 1571 ] 
[2695] 




[ 1426] 
[7015] 

[ 555 ] 
[1143] 
[ 1528 ] 
[1143] 
[2950] 

[2842] 

[ 205 ] 
[6099] 


[ 197] 
[6471] 




44 PC 11'89 

































Programm 


BOING! 

Breakout mit dem Gummiball 


Waren Sie schon einmal ein hüpfender Gummiball? 
Nein? Sie kennen nicht das Gefühl, im Zickzack durch 
die Lüfte zu rasen und dabei ein permanentes Auf und 
Ab zu erleben? Den dadurch entstandenen Nachholbe¬ 
darf können Sie nun mit diesem Spiel decken. 



Der naschsüchtige Gummiball sollte auf seiner Nahrungssuche die Toten 
köpfe meiden 


Einst war ein Gummiball, der im 
Schlaraffenland lebte und auf einer 
senkrechten Fläche Bonbons einsam¬ 
melte. Zwar behinderten ihn ein paar 
Mauern, die in der Gegend herumstan¬ 
den, aber was machte das schon? 

Leider war der niederträchtige Sensen¬ 
mann mit der Zeit derart bonbonsüch¬ 
tig geworden, daß er dem Ball die herr¬ 
lichen Leckereien nicht so recht gön¬ 
nen wollte. So zauberte er dem armen 
Gummiball Totenköpfe in den Weg, 
bei dessen Berührung der Ball eines 
seiner fünf Leben verwirkte. 


Das Spiel 

Nun muß der Spieler den Part des Bal¬ 
les, der nach den Naturgesetzen immer 
nach oben und unten hüpft, überneh¬ 
men, indem er den Ball mit dem Joy¬ 
stick so nach rechts und links ver¬ 
schiebt, daß dieser ohne Gefahren alle 
Bonbons aufessen kann. Dabei haben 
die einzelnen Dinge folgende Auswir¬ 
kungen. Bonbon = Ball prallt ab, be¬ 
kommt 10 Punkte, Bonbon löst sich 
auf. Totenkopf = Ball verliert eines 
seiner fünf Leben. Mauerstück = Ball 
prallt nur ab. Zu Beginn des Spiels 


wählen Sie mit dem Joystick das Start- 
level aus (Joystick rechts/links) und 
drücken dann Feuer, worauf das Spiel 
in dem gewählten Level beginnt. 

Um ein Level zu beenden, müssen sie 
alle Bonbons aufessen. Insgesamt be¬ 
sitzt das Spiel 20 Levels. 

Sonstiges 

Das Programm ist in reinem BASIC 
geschrieben, die REM-Zeilen werden 
nicht angesprungen und können daher 
weggelassen werden. 

(S.Schmidt/jf) 


für 464-664-6128 



10 • - [1414] 

20 ' B O I N G ! [528] 

30 • - [1414] 

40 ’ written by Stefan Schmidt [1490] 

50 ’ Maerz-Juni 1989 in Baldham [3337] 

60 ' - [1414] 

70 ’ [117] 

80 ' *** Initialisierung *** [1272] 


90 MODE 0:FOR i=0 T0 15:READ ii:INK i ,ii :N [3679 ] 
EXT:BORDER 0:DIM feld(15,20) 

100 ENV 1,15,-1,2:ENT 1,5,-1,2,3 , 1 , 1,5 , - 1 , [ 4625 ] 

I, 2, 1, 1,20,-2,1:ENV 2,15,-1,3:ENV 10,15,-1 
, 10 

110 SYMBOL AFTER 32:DATA 0,26,1,13,10.3,9, [3580] 

II, 12,14,17,16,20,19,21,24 

120 ' *** Symbole *** [947] 

130 SYMBOL 112,224,160,160,160,160,160,224 [3727] 
: SYMBOL 113,64,64,64,64,64,64,64 

140 SYMBOL 114,224,32,32,224,128,128,224:S [3871] 
YMBOL 115,224,32,32,224,32,32,224 

150 SYMBOL 116,160,160,160,224,32,32,32:SY [4397] 
MBOL 117,224,128,128,224,32,32,224 

160 SYMBOL 118,128,128,128,224,160,160.224 [3619] 
: SYMBOL 119,224,32,32,32,32,32,32 

170 SYMBOL 120,224,160,160,224,160,160,224 [4321] 

: SYMBOL 121,224,160,160,224,32,32,32 

180 SYMBOL 129,224,160,160,224,160,160,160 [5082] 

:SYMBOL 130,192,160,160,192,160,160,192 

190 SYMBOL 131,224,128,128,128,128,128,224 [5112] 

: SYMBOL 132,192,160,160,160,160,160,192 

200 SYMBOL 133,224,128,128,224,128,128,224 [4056] 

: SYMBOL 134,224,128,128,224,128,128,128 

Usting Boing 



210 SYMBOL 135,224,128,128,160,160,160,224 [3947] 

:SYMBOL 136,160,160,160.224,160,160,160 
220 SYMBOL 137,64,64,64,64,64,64,64:SYMBOL [3783] 
138,224,32,32,32,32,32,192 
230 SYMBOL 139,160,160,160,192,160.160,160 [3376] 
:SYMBOL 140,128,128,128,128.128,128,224 
240 SYMBOL 141,160,224,224,160,160,160,160 [4456] 
:SYMBOL 142,224,160,160,160,160,160,160 
250 SYMBOL 143,64,160,160,160,160,160,64:S [3605] 
YMBOL 144,192,160,160,192,128,128,128 
260 SYMBOL 145,64,160,160,160,160,160,96:S [4541] 
YMBOL 146,192,160,160,192,128,192,160 
270 SYMBOL 147,96,128 , 128,64,32,32,192:SYM [ 4274 ] 
BOL 148,224,64,64,64,64,64.64 

280 SYMBOL 149,160,160,160,160,160,160,224 [2953] 

:SYMBOL 150,160,160,160,160,160,160,64 

290 SYMBOL 151,160,160,160,160,224,224,160 [3267] 

;SYMBOL 152,160,160,160,64,160,160,160 

300 SYMBOL 153, 1 60,160, 1 60,64,64,64,64:SYM [ 4348 ] 

BOL 154,224,32,64,64,128,128,224 

310 SYMBOL 254,126,102,60,24,66,60,66:SYMB [3507] 
OL 255,0,24,60,90,90,126,126,126 

320 SYMBOL 245,0,251,251,251,0,223,223,223 [4155] 
:SYMBOL 250,126,126,126,126,126,126,60 
330 SYMBOL 251.0,60,114,122,126,126,126,12 [3517] 
6:SYMBOL 252,0,0,&X1100,&X100 

340 SYMBOL 231,0,0,56,124,124,124,56:SYMBO [3197] 
L 96,0:GOTO 570 

350 ' #** Level-Daten *** [2213] 

360 DATA 000000000000000,000000000000000,0 [7935] 
00022222220000,000222222222000,00022211122 
2000,000333333333000,000222111222000,00022 
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□ 


2222222000,000022222220000,000000000000000 
,14,12 

370 DATA 000000000000000,001111111111100,0 
02222212222200,002222212222200,00000000000 
0000,003333333333300,000000000000000,00000 
0000000000,000000000000000,000000000000000 
,1,10 

380 DATA 000000000000000,000000000000000,0 
00001222200000,000002122200000,00000221220 
0000,000002221200000,000002222100000,00000 
0000000000,000000000000000,000000000000000 
,1,6 

390 DATA 222220000000000,001000000000000,3 
33332222200000,000000110000000,00000333332 
2222,000000000001100,222222222233333,01100 
0110000000,333333333300000,000000000000000 
,1,10 

400 DATA 121212112121212,222212002122222,2 
22210000122222,222233003322222,22222000022 

2222,.3 33330330333333,212210000122121,00000 
0000000000 , 000000000000000,000000000000000 
,14,15 

410 DATA 000000000000000,000000000000000,0 

00332222233000,000122212221000,00022222222 
2000,000122212221000,000331222133000,00000 
0000000000,000000000000000,000000000000000 
,1,10 

420 DATA 112222101222211,122223000322221,2 
22230000032222,222300000003222.22300000000 
0322,230000000000032,300000000000003,00000 
0000000000,OOOOOOOOOOOOÖOO,000000000000000 
,8,12 

430 DATA 212121212121212,010101010101010,0 
10101010101010,010101010101010,01010101010 
1010,010101010101010,010101010101010,00000 
0000000000,000000000000000,222222222222222 
.1.3 

440 DATA 000000000000000,000003333300000,0 
00002212200000,000002222200000,00000333330 
0000,000002222200000,000001222100000,00000 
3333300000,000002222200000,011102212201110 
.1.10 

450 DATA 000000000000000,000000000000000,0 
01131111131100,002322322322200,00222322223 
2200,002332222223200,003222322322300,00223 
3233233200,000000000000000,000000000000000 
,5,2 

460 DATA 000000000000000,222221222220000,0 
00000000000000,222222222220000,11111111111 
0000,333333333330000,111111111110000,22222 
2222220000,222222222220000,000000000000000 
,14,3 

470 DATA 00000000000000,000000000000000,00 
0000000000000,222222222222222,333333000333 
333,111111000111111,000000000000000,000000 
000000000,000000000000000,222222111222222, 
14,2 

480 DATA 022200222002220,010000102001000,0 
10000222002000,010000100001000,02120020000 
2120,000000000000000,000000000000000,00000 
0000000000,000000000000000,000000000000000 
,15,10 

490 DATA 000000000000000,000002222200000,0 
00021222120000,000022222220000,00002111112 
0000,000002222200000,000000222000000,00200 
0000000200,000133333331000,002000000000200 

,1,3 

500 DATA 000001222100000,000032223000000,0 
00322230000000,003222300000000,03222100000 
0000,322210000000000,032221000000000,00322 
2100000000,000000000000000,000000000000000 
,14.10 

510 DATA 200000000000000,333333333333330,0 
00000000000000,002222222222222,00211131111 
1113,002222222222222,000000000000000,22222 
2222222220,113111311131120,222222222222220 
,2.2 

520 DATA 000000000000000,000000212000000,0 
00002212200000,000022212220000,00022221222 
2000,000331111133000,000222212222000,00002 
1212120000,000002212200000,000000212000000 
,1.10 

530 DATA 000000010000000,000000222000000,0 
00002222200000,000022212220000,00001132311 
0000,333010202010333,000010202010000,00001 


[8319 ] 


[8058] 


[8469] 


[7781] 


[7764] 


[8982] 


[8512] 


[7624] 


[6840] 


[6682] 


[8332] 


[8084] 


[7907] 


[8775] 


[7135] 


[8113 ] 


[8192 ] 


Listlng Boing 


1101110000,000000000000000,000000000000000 

,15,3 

540 DATA 111111111111111,000000000000000,0 [7761] 

33300333003330,012100121001210,02220022200 
2220,000000000000000,000000000000000,00100 
0000000100,033300333003330,000000000000000 
.5,3 

550 DATA 000000001000121,000000100010022,3 [8706] 

33033333333333,111011111111111,02200000000 
0000,000200000000000,022000000303000,02002 
2000000000,000200000000000,110022022222222 
, i , 2 

560 ' *** Anfangsmeldung *** [2107] 

570 1 eve1 = 1:MODE 0:FOR a=l TO 100:PL0T RND [ 4383] 
*640,RND* 400,INT(RND*15)+1:NEXT:TAG 

580 a$="B O I N G ":x=190:y=370:c=l:GO [2848] 
SUB 1420 

590 a$="COPYRIGHT BY STEFAN SCHMIOT":x=80: [4233] 
y=330:c=3:GOSUB 1420 

600 a$="CHOOSE START LEVEL WITH JOYSTICK " [4327] 

:x=50:y=300:c=6:GOSUB 1420 

610 a$=”LAST SCORE "+STR$(sc):c=3:x=60:y=4 [2114] 

0:GOSUB 1420 

620 a$="HIGHSCORE "+STR$(highsc):x=350:GOS [2401] 
UB 1420 

630 a$="ST ART IN LEVEL":x=140:c=4:y=190:GO [ 2789 ] 
SUB 1420 

640 a$=STR$(1evel):x=360:c=4:y=190:GOSUB 1 [4487] 
420:SOUND 129,0,0,0,1,0,5 

650 IF JOY (0) = 4 AND levelOl THEN level = le [ 4867 ] 
ve1 - 5:WHILE JOY(0):WEND:GOTO 640 

660 IF JOY( 0 ) = 8 AND level<>16 THEN leve1=l [4514] 
evel+5:WHILE JOY(0):WEND:GOTO 640 

670 IF JOY( 0 ) = 1 6 THEN TAGOFF:CLS:SOUND 1,0 [4504] 

,0,15,10,0,30:GOTO 700 

680 GOTO 650 [371] 

690 ' #** Umrandung u. Feldaufbau *** [2532] 

700 TAGOFF:WINDOW 2,18,1,24:PAPER 4:CLS:PA [3269] 
PER 0:WINDOW 3,17,3,22:CLS 

710 PLOT 32,16,0:DRAWR 32,34:PLOT 576,14:D [5007] 

RAWR -32,34:PLOT 32,399:DRAWR 32,-34 

720 PLOT 576,400:DRAWR -32,-34:WINDOW 3,20 [5036] 

, 3,25:1ive = 4:sc = 0:GOSUB 1000 

730 an2=0:anz2=0:FOR y=l TO 20 STEP 2:READ [4112] 
b$:FOR x=l TO 15:*ert=VAL(MID$(b$,x,1)) 

740 IF we r t = 0 THEN fe1d(x,y) = 0:fe1d(x,y+1) [ 2756 ] 

=0:GOTO 780 

750 IF wert=l THEN fe1d(x,y>=1:fe1d(x,y+1) [6051] 

= 1:LOCATE x,y:PEN 1:PAPER 5:PRINT CHR$(255 
);CHR$(8);CHR$(10);CHR$(254):PAPER 0:G0T0 
780 

760 IF wert = 2 THEN fe1d(x,y)=2:fe1d(x,y+1 ) [ 12551 ] 

= 4:PRI NT CHR$(22) ;CHR$(1) ; :LOCATE x,y:PEN 
1:PRINT CHR$(252 ):LOCATE x,y:PEN I NT(RND*1 
0)+6:PRINT CHR$(251);CHR$(8);CHR$(10);CHR$ 

(250); :PRINT CHR$(22);CHR$(0 ); :anz = anz+l:G 
OTO 780 

770 IF we rt=3 THEN fe1d(x,y)=3:fe1d(x,y + 1) [8350] 
=3:LOCATE x,y:PEN 3:PRINT CHR$(245);CHR$(8 
);CHR$(10);CHR$(245) 

780 NEXT:NEXT:READ x,y:ri=1:PEN 1 [1478] 

790 ' *** Hauptschleife *** [1012] 

800 LOCATE x,y:PRINT CHR$(231) [1089] 

810 IF fe1d(x , y ) = 1 THEN GOTO 910 [ 2286] 

820 IF fe1d(x,y)=2 THEN LOCATE x,y+l:PRINT [10212] 

" ":sc = s c+10:ri=0-ri :feld(x,y}=0:feld(x,y+ 

1)=0:SOUND 129,200,15,15,1:SOUND 130,100,1 

5,15,1:anz2=anz2+l:IF anz2=anz THEN 960 

830 IF feld(x,y)=4 THEN LOCATE x,y-l:PRINT [8335] 

" ":sc = sc+10:ri=0-ri :feld(x,y)=0:feld(x,y- 

1)=0:S0UND 129, 200,15 , 15,1:SOUND 130,100,1 

5,15,I:anz2=anz2+1:IF anz2=anz THEN 960 

840 IF y=20 THEN r1=-l:S0UND 129,400.0,0,2 [2173] 

, 1 

850 IF y=1 THEN ri=l:SOUND 129,400,0,0,2,1 [1901] 
860 xr=0:IF JOY(0)=8 THEN xr=l:IF x+xr>15 [2305] 

THEN x r = 0 

870 IF JOY(0) = 4 THEN xr=-l:IF x + xr<l THEN [1261] 
x r = 0 

880 IF fe1d(x+xr,y+ri)=3 THEN r1=0-r1:SOUN [2669] 
D 129,400,0,0,2,1 

890 LOCATE x,y:PRINT" ":x=x+xr:y=y+ri:GOTO [1862] 
800 

900 ' *** Leben verloren *** [2566] 

910 ENT -15,4,4,1,4,-3,1,4,4,1,4,-3,1:ENV [2535] 
15,6,-1,2,5, 1,2,5,-1,2,5, 1,2 
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920 SOUND 1,119,-10,15,15,15:SOUND 2,60,-1 [3580] 
0,15,15, 15:SOUND 4,30,-10,15,15,15 

930 FOR w=l TO 2000:NEXT:11ve=11ve-1 : IF li [3527] 
ve=-l THEN GOTO 1350 

940 WINDOW 3,17,3,22:CLS:WINDOW 3,20,3,25: [2898] 

GOTO 1000 

950 ' *** Level geschafft *** [1887] 

960 1evel=1evel+1:IF leve1=21 THEN GOTO 12 [3802] 
70 

970 WINDOW 3, 17,3,22:CLS:ENT -15,5,120,5,5 [4096] 
,-120,5:ENV 15,15,-1,30 

980 SOUND 1,100,0,15,15,15:SOUND 2,200,0,1 [2108] 
5,15,15 


990 ' *** Restore-Anweisungen **# [2736] 

1000 ON level GOTO 1010,1020,1030,1040,105 [5753] 
0,1060,1070,1080,1090,1100,1110,1120,1130, 
1140,1150,1160,1170,1180,1190,1200 

1010 RESTORE 360:GOTO 1220 [1000] 

1020 RESTORE 370:GOTO 1220 [1268] 

1030 RESTORE 380:G0T0 1220 [1142] 

1040 RESTORE 390:GOTO 1220 [1410] 

1050 RESTORE 400:GOTO 1220 [1535] 

1060 RESTORE 410:G0TO 1220 [1130] 

1070 RESTORE 420:GOTO 1220 [1520] 

1080 RESTORE 430:GOTO 1220 [2076] 

1090 RESTORE 440:GOTO 1220 [1320] 

1100 RESTORE 450:GOTO 1220 [1668] 

1110 RESTORE 460:GOTO 1220 [569] 

1120 RESTORE 470:GOTO 1220 [1580] 

1130 RESTORE 480:G0T0 1220 [1720] 

1140 RESTORE 490:GOTO 1220 [1716] 

1150 RESTORE 50O:GOTO 1220 [1520] 

1160 RESTORE 510:G0T0 1220 [1580] 

1170 RESTORE 520:GOTO 1220 [1390] 

1180 RESTORE 530:GOTO 1220 [1130] 

1190 RESTORE 540:GOTO 1220 [569] 

1200 RESTORE 550 [765] 


1210 * *** Anzeige von Level, Score, Leben [1932] 
*** 

1220 TAG:a$="LEVEL "+STR$(1eve1):c=1:x =200 [4180] 
: y = 300:GOSUB 1420 

1230 a$="SCORE "+STR$(sc):x=200:y=250:GOSU [2939] 
B 1420 

1240 a$="LIVES "+STR$(1ive):x=200:y=200:GO [3359] 
SU8 142 0:T AGOFF 

1250 FOR n=1 TO 2000:NEXT:WINDOW 3,17,3,22 [4073] 
:CLS:WINDOW 3,20,3,25:GOTO 730 

1260 *** Alles geschafft *** [1588] 

1270 ENT -15,24,10,1,40,-10,1:ENV 15,1,-1, [3703] 
170,14,-1,20:ENT -14,24,5, 1,40,-5, 1 
1280 MODE 0:TAG:SOUND 129,1000,300,15,15,1 [3475 ] 
5 : SOUND 130,500,300,15,15,14 

1290 a$="CONGRATU LAT IONS":c = 1 2:x=170:y=350 [ 2 72 7 ] 
: GOSUB 1420 

1300 a$="YOU MASTERED THE LAST LEVEL AND": [4083] 
x=90:y=270:c=l:GOSUB 1420 

1310 a$="WON AGAINST THE DEATH":x=140:y=24 [3326] 
0:GOSUB 1420 

1320 bon=INT(RND*500)+1ive*100:sc=sc+bon [1563] 
1330 a$="BONUS "+STR$(bon):x=200:y=l70:c=4 [2954] 

:GOSUB 1420:GOTO 1390 

1340 ' *** Game over *** [1203] 

1350 MODE 0:TAG:a$="G A M E 0 V E R":c=l [3830] 
:x=150:y=230:GOSUB 1420 

1360 ENT -15,4,4,1,4,-3,1,4,4,1,4,-3,1:ENV [3703] 
15,6,-1,4,5,1,4,5,-1,4,5,1,4:SOUND 135,0 
1370 SOUND 1,500,-10,15,15,15:SOUND 2,250, [5581] 
-10,15,15,15:SOUND 4,125,-10,15,15,15 
1380 ' *** Warten auf Tastendruck und Spru [5049] 

ng zur Anfangsmeldung *** 

1390 a$="PRESS ANY KEY":x=180:c=4:y=30:GOS [5260] 

UB 1420:IF sc>highsc THEN highsc=sc 

1400 WHILE JOY(O):WEND:WHILE INKEY$<>'"‘:WE [3685] 

ND:WHILE INKEY$="":WEND:SOUNO 135,0:G0T0 5 

70 

1410 ' *** Anzeigeroutine fuer MINI-Schrif [2487] 

t *** 

1420 T AG:PLOT -10,-10,c:MOVE x,y:FOR a = l T [1866] 
0 LEN(a$ ) 

1430 PRINT CHR$(ASC(MID$(a$,a, 1) ) + 64) ; [ 1274 ] 

1440 MOVER -16,0:NEXT:TA GO FF:RETURN [ 1 755 ] 


Lisling Boing 


Diskettenlaufwerke 


• Anschlußfertig ! Sie brauchen 
wirklich nichts mehr. 

• Qualitätslaufwerke von TEAC 

• 2*80 Spuren, 1 MegaByte unfor¬ 
matierte Speicherkapazität 

• 1 Jahr Garantie ! 


JOYCE 

3.5" 249.- 5.25" 328.- 


Alle Diskettenlaufwerke sind ohne technische Kentnisse leicht 
als Zweitlaufwerke an Ihren JOYCE anzuschließen. Sie funk¬ 
tionieren auch mit einer Speichererweiterung problemlos. Die 
Kapazität beträgt 1 MB unformatiert und 726 KB formatiert. Die 
5.25" Stationen verfügen überein eigenes Netzteil (VDE) und 
eine 40/80 Track Umschaltung (notwendig für MsCopy). 

Für den Betrieb mit unseren 5.25" Laufwerken wurde das Pro¬ 
gramm MsCopy entwickelt. Es ermöglicht den Datenaus¬ 
tausch zwischen Ihrem JOYCE und einem PC. 

MsCopy (Lesen/Schreiben von MsDos) 49.- 


CPC 

3.5" 279.- 5.25" 328.- 


Zweitlaufwerke mit 830 KB formatierter Kapazität unter CP/M, 
2 x360 KB unter Amsdos bzw. BASIC. Alle Laufwerke werden 
serienmäßig mit einem Seitenumschalter ausgerüstet, so daß 
beide Diskettenseiten genutzt werden können. Unter CP/M ge¬ 
schieht die Umschaltung automatisch. Im Lieferumfang sind 
die Programme DiskPara und MsCopy enthalten. 

DiskPara füraiiecpc’s 79.- 

~T B w 1 % 1 Wl w Programm zur Erhöhung der 
Diskettenkapazitat. Ermöglicht ie nach Laufwerkstyp Kapazitä¬ 
ten bis 830 KB unter CP/M. Vollkompatibel läuft z.B. mit: 
Turbo Pascal, DBase und Wordstar. 

Erfolgreich getestet in Schneider Aktiv 5/87, c’t 5/87, PC 
Int. 6/87, CPC Mag. 4/87, Happy Comp. 4 /87, M&T Sonderheft 

Unsere Produkte erhalten Sie auch auf folgenden Messen : 

Hobby und Elektronik, 9.-12.11.89 

Stuttgart 

HobbyTec, 18.-22.11.89 

Essen 

Frank Strauß Elektronik 
Schmiedstr.11 6750 Kaiserslautern 
Tel. (0631) 67096-98 FAX : 60697 

Bitte bei Bestellungen genaue Systemkonfiguration angeben. 
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r~Programm 


Kalender einmal anders 

Noch ein Kalenderprogramm? - 
Ja, aber was für eines! 

Man sagt im allgemeinen, die Mädchen seien mit 1000 Wochen am hübsche¬ 
sten. Aber haben Sie schon einmal einem dazu auf den Tag genau gratulie¬ 
ren können? Einen Kollegen zu beglückwünschen, wenn er z.B. 11.111 Tage 
alt wird, wäre doch auch nicht schlecht, zumal er dann auch sicher nicht 
umhinkönnte, sich das eine Runde kosten zu lassen. Oder wollen Sie etwa 
nicht wissen, an welchem Tag Sie eine Milliarde Sekunden alt werden? 


Das alles und noch vieles mehr können 
und erfahren Sie mit “Happy Calen- 
dar“. So finden Sie viele kleine zusätz¬ 
liche Anlässe zu Glückwünschen, mit 
denen Sie Ihren Freunden eine überra¬ 
schende Freude bereiten können, und 
die ist ja bekanntlich die schönste. 

Ein kleines Fest, wenn die Mitglieder 
der Familie zusammen 100 Jahre alt 
werden, feiert eben auch nicht jeder. 

In einem Hauptmenü bietet Ihnen der 
Rechner an, den “Abstand zwischen 
zwei Daten“ zu berechnen oder das 
“Enddatum einer Tagesdifferenz“, die 
Sie zu einem Anfangsdatum eingeben, 
oder auch den “Wochentag“ zu einem 
Datum (sind Sie ein Sonntagskind?). 
Schaltjahre werden exakt berücksich¬ 
tigt, und das Programm akzeptiert Da¬ 
ten nach der Einführung des gregoria¬ 
nischen Kalenders (1582). Bis hierher 
gibt es nichts Neues. Das konnten an¬ 
dere Programme auch schon, aber es 
fiel hier eben praktisch nebenbei mit 
ab. Aber jetzt kommt’s! 

Im Menüpunkt “Jubiläumskalender“ 
erhalten Sie das korrekte Datum nebst 


Wochentag für ein von Ihnen angege¬ 
benes Jubiläum, also z.B. 1.111 Wo¬ 
chen nach einem Ausgangsdatum. 
Nach Eingabe dieses Ausgangsdatums 
(Geburtstag, Eintritt in die Firma, 
Hochzeitstag) werden Sie nach einem 
Intervallanfang und einem Intervallen¬ 
de gefragt. Dieses Intervall ist der Zeit¬ 
raum, in dem Sie Jubiläen suchen wol¬ 
len, also z.B. das laufende Jahr oder 
das nächste. 

Die Feste feiern, wie sie fallen 

Dann wählen Sie die gewünschte Zeit¬ 
einheit (Wochen, Tage, Stunden 
usw.), und der Rechner liefert Ihnen 
Anfang und Ende des Intervalls in die¬ 
ser Einheit, gerechnet vom Ausgangs¬ 
datum an. (Stunden, Minuten und Se¬ 
kunden werden von 0.00 Uhr des Aus¬ 
gangsdatums an gezählt). Nun können 
Sie entscheiden, welche Ihrer Ansicht 
nach interessanten Zahlen in das Inter¬ 
vall fallen, und diese eingeben. Liefert 
eine Einheit im Intervall nichts “Brauch¬ 
bares“, versuchen Sie durch Eingabe ei¬ 



ner 0 (oder einfach ENTER) eine andere. 
Bei großen Differenzen zum Ausgangs¬ 
datum braucht das Programm einige Au¬ 
genblicke, da ja unter anderem wegen 
der Schaltjahre die Monate einzeln rück¬ 
gezählt werden müssen. 

Im Menüpunkt “Gruppenalter“ be¬ 
stimmen Sie, wann mehrere Personen 
zusammen ein bestimmtes Alter errei¬ 
chen. Nach den einzelnen Geburtsta¬ 
gen geben Sie einen Prüfbereichsan¬ 
fang ein und erhalten zu Ihrer Orientie¬ 
rung das gemeinsame Alter der Gruppe 
zu diesem Zeitpunkt. Nun tippen Sie 
das gewünschte Alter ein, das größer 
sein muß als das zum Prüfbereichsan¬ 
fang. Im Gruppenalter ist nur das 
Rechnen mit Jahren vorgesehen. 

Und nun viel Freude bei der Durchfor¬ 
stung des Kalenders nach ganz neuen 
Aspekten mit “Happy Calendar“. 

(Hans Felis/jt) 


für 464-664-6128 

1 — 



10 ' HAPPY CALENDAR 

20 ' 

30 1 
40 ' 

50 * 

60 '- 

70 ‘ 

80 * Hauptmenue 

90 • 

100 DEFSTR z:DIM rg(20):GOSUB 400:MODE 1 
110 LOCATE 10,1: FOR 1=1 TO 2 3 : PRI NT " * " ; : NE 
XT 

120 FOR 1=2 TO 4:LOCATE 10,i:PRINT"*";SPC( 
21);:NEXT 

130 LOCATE 10,5:FOR 1=1 TO 23:PRINT”*";:NE 
XT 

140 LOCATE 3,18:PRINT CHR$(150);:FOR 1=1 T 
0 34:PRINT CHR$(154);:NEXT:PRINT CHR$(156) 
150 FOR 1=19 TO 24:LOCATE 3,i:PRINT CHR$(1 
49);SPC(34);CHR$(149):NEXT 

160 LOCATE 3,25:PRINT CHR$(147);:FOR 1=1 T 
0 34;PRINT CHR$(X54);:NEXT:PRINT CHR$(153) 


[352] 

[117] 

[117] 

[117] 

[117] 

[1412] 

[117] 

[836] 

[117] 

[ 2112 ] 

[2380] 

[3735] 

[2739] 

[5333] 

[3801 ] 

[5113] 


170 WINDOW #1,ll,31,2,4:WINDOW #2,4,37,19, [3754] 

24:WINDOW #3,6,40,8,15:WINDOW SWAP 0,3 
180 CLS:LOCATE #1,6,2:PRINT#1,"HAUPTMENUE" [1886] 
190 LOCATE #2,2,1:PRINT#2,"Abstand zwische [5113] 
n zwei Daten"TA8(31)1" 

200 LOCATE #2,2,2:PR INT#2,"Enddatum einer [4178] 
Tagesdlff."TABC31)"- 2" 

210 LOCATE #2,2,3:PRINT#2,"Wochentag"TAB(3 [3608] 
1)"- 3" 

220 LOCATE #2,2,4:PRINT#2,"Jubi1aeumskalen [4769] 
der"TAB(31)"- 4" 

230 LOCATE #2,2,5:PRINT#2,”Gruppena1ter"TA [3309] 
B(31)”- 5" 

240 LOCATE #2,2,6:PR I NT#2, "Ende"TAB(31)"- [ 2266] 

6" 

250 CLS:PRINT"Was waehlen Sie bitte?":PRIN [5392] 
T:GOSUB 300:n=ASC(z)-48:IF n<l OR n>6 THEN 
250 

260 ON n GOTO 850,1020,1210,1320,1830,2070 [1430] 


270 ' [117] 

280 ’ Unterprogramme [916] 

290 ' [117] 

300 Z=UPPER$(INKEY$):IF z="" THEN 300 [2409] 

310 RETURN [555] 

320 ' [117] 

330 u=t:v=m:w=j:IF v>2 THEN v=v-3:GOTO 350 [1768] 

340 v=v+9:w=w-l [1393] 


| Listing Kalender 


Lisling Kalender 
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350 r = I NT(365.25*w)-INT(w/100) + INT(w/400 ) + 
INT(30.6* v + O.5)+u:RETURN 
360 ' 

370 PRINT RIGHT$(STR$(d),LEN(STR$(d) )-l ) ; " 
.";:RETURN 

380 PRINT#2,RIGHT$(STR$(d),LEN(STR$(d))-l) 
I " . " ; -.RETURN 
390 ‘ 

400 zw(1)="Sonntag":zw(2)="Montag":zw{3)=" 
Dlenstag":zw(4)="M1ttwoch" 

410 zw(5)="Donnerstag”:zw(6)="Fre1tag":zw( 
0 )="Sonnabend** 

420 ze(1)="Wochen":ze(2)="Tage":ze(3)="Stu 
nden " 

430 ze(4) = "Mi nuten":ze(5) = "Sekünden":RETUR 
N 

440 ‘ 

450 DATA 0,31,59,90,120,151,181,212,243.27 
3,304,334,365 

460 RESTORE 450:F0R 1=1 TO mu:READ k:NEXT: 
nj=tu+k+dt 

470 j =j u:GOSUB 650:IF tu + k>59 THEN nj=nj+s 
480 IF s=l AND tu+k=60 AND tu=29 THEN nj = n 
j-1 

490 RESTORE 450:FOR 1=1 TO 13:nl=n:READ n 
500 IF nJ >59 THEN n = n + 3 
510 IF n J < =n THEN 530 

520 NEXT 1:nj=nj-n:j = j + l:GOSUB 650:G0TO 49 
0 

530 m=1-1:t=nj-nl:IF nj=60 THEN t=t+s 
540 RETURN 
550 ' 

560 DATA 31,28,31,30,31,30,31,31,30,31,30, 
31 

570 IF J < 1 5 8 3 OR j>9999 THEN PRINT"Im greg 

or. Kalender bleiben !":p=l:RETURN 

580 IF m<1 OR m>12 THEN 630 

590 RESTORE 560:FOR 1=1 TO m:READ ml:NEXT: 

GOSUB 650 

600 IF m=2 THEN ml=ml+s 
610 IF t<0 OR t>ml THEN 630 
620 p=0:RETURN 

630 PRINT"Ihr Datum gibt es nicht !":P=1-R 

ETURN 

640 ' 

650 3=0:IF (j MOD 4) =0 THEN s=l 
660 IF (J MOD 100)=0 AND (INT(j/100) MOD 4 
)<>0 THEN 3=0 
670 RETURN 
680 • ' 

690 DATA 5,1,1,4,6,2,4,7,3,5,1,3 
700 DATA 2,7,5,3 

710 RESTORE 690:FOR 1=1 TO m:READ mi:NEXT 
720 sk = 0:IF s = l AND m<3 THEN sk = -l 
730 RESTORE 700:F0R 1=0 TO (INT(j/100) MOD 
4):READ 1:NEXT 

740 w=(t+ml+INT((j MOD 100)/4)+(j MOD 100) 

+1+3k) MOD 7 

750 RETURN 

760 1 

770 CLS#1 

780 CLS#2:RETURN 

790 ' 

800 SOUND 1,40,0,0,1:SOUND 1,10,20,0:SOUND 
1,30,0,0,1:ENV 1,3,5,2,1,0,3,5,-3,2 
810 RETURN 
820 1 

830 Abstand zweier Tage 

840 ' 

850 CLS :GOSUB 770:LOCATE #1,2,2:PRINT#1,"A 
BSTAND ZWEIER TAGE" 

860 PRINT:INPUT"Anf.-datum (als T,M,J)";ta 
,ma,ja:t=ta:m=ma:j=ja:GOSUB 570 
870 IF p=l THEN 860 
880 GOSUB 330:ra=r 

890 INPUT"Enddatum (als T,M,J)";te,me,je 

: t = te:m=me:j=je:GOSUB 570 

900 IF p=l THEN 890 

910 GOSUB 330:re=r:r=re-ra 

920 GOSUB 800 

930 LOCATE #2,6,2:d=ta:GOSUB 380:d=ma:GOSU 
B 380:PRINT#2,RIGHT$(STR$(ja),4); 

940 PRINT#2, - ";:d=te:GOSUB 380:d=me:G 

OSUB 380:PRINT#2,RIGHT$(STR$(je),4) 

950 PRINT#2:LOCATE #2,12,4:PRINTÜ2,r;"TAGE 


[ 4467 ] 

[117] 

[1913] 

[2431] 

[117] 

[6162] 

[5350] 

[3152] 

[3513] 

[117] 

[2472] 

[3067] 

[1956] 
[3033] 

[2125] 

[ 1084] 
[916] 

[1583] 

[2658] 

[ 555 ] 
[117] 
[2039] 

[5681] 

[1370] 

[3486] 

[990] 
[1302 ] 

[ 1000 ] 
[2061 ] 

[117] 

[2207] 

[2850] 

[ 555] 
[117] 

[1405] 

[ 547] 

[ 1266] 
[2157] 
[1987] 

[3739] 

[ 555 ] 
[117] 

[ 373 ] 
[616] 
[117] 
[3578] 

[ 555 ] 
[117] 

[1356] 
[117] 
[2811] 

[4121] 

[937] 

[1601] 
[3220] 

[915] 

[2266] 

[820] 

[5129] 

[4150] 

[2448] 


960 PRINT:PRINT:PRINT:PRINT"Noch einmal (J [5445] 
/N ) ?":GOSUB 300:IF z="N" THEN GOSUB 770:G0 
TO 180 

Usting Kalender 



Bücherkiste 


AUS DEM SYBEX-ANGEBOT 

Schneider CPC - 
Arbeiten mit dBASE II 

Benulzern eines CPC vermittelt ein echter Ex¬ 
perte in diesem Buch alle Kenntnisse, die tür 
den erfolgreichen Einsatz von dBASE II wichtig 
sind, z.B.: Installation und Programmieren mit 
dBASE II. Editieren von Dateien mit Wordstar, 
Tips und Tricks. Jeder Lernschritt wird durch 
praxisgerechte Beispiele ergänzt. Und zwar so, 
daß dem Leser die Umsetzung dann wirklich 
problemlos möglich ist Ein Buch, das in jeder 
Arbeitsphase weiterhilft. 

227 Seiten/mit Abb. Best,-Nr.: 440 DM48,-* 

Schneider CPC - 
Arbeiten mit Turbo Pascal 

Der Bestseller "Das Turbo Pascal Buch" wurde 
speziell (ür Besitzer eines CPC überarbeitet, So 
ermöglicht es den optimalen Einsatz der lei¬ 
stungsfähigen Programmiersprache - aut die 
CPC-Arbeits- und Systemumgebung zuge¬ 
schnitten - und durch zusätzliche Informatio¬ 
nen ergänzt. Zahlreiche Beispiele veranschau¬ 
lichen die vorgestelllen Programmierkonzepte, 
Übungen zu jedem Kapitel machen dieses 
leicht verständlich geschriebene Buch für Ein¬ 
sfeiger zur unentbehrlichen Arbeitshilfe. 

296 Seiten/mit Abb. Besl.-Nr.: 441 DM48,-* 

Das Schneider CPC 
Grafikbuch 

Die vielfältigen Grafikmöqlichkoiten Ihres 
Schneider CPC (464,664 und 6128). Von einer 
allgemeinen Einführung über ergänzende Gra¬ 
fikbefehle, Erstellung von Grafiken mit dem Joy¬ 
stick, Darstellung zwei- und dreidimensionaler 
Diagrammformen, künstlerische Grafiken, Zu¬ 
sammenspiel zwischen Grafik und Datenträger 
bis hin zur Hardcopy. 

328 Seifen/zahlr. Abb, Best.-Nr.: 442 DM48,-* 

Schneider CPC - 
Erfolg mit Multiplan 

Ein didaktisch hervorragendes Lehrbuch und 
Nachschlagewerk für CPC-Besitzer, die das Ta¬ 
bellenkalkulationsprogramm anwenden wollen. 
Das Buch ist die überarbeitete, auf den CPC zu¬ 
geschnittene Version des Bestsellers "Erfolg mil 
Multiplan“ und führt Schritt für Schritt in das 
Programm ein. An konkreten Beispielen wird er¬ 
klärt, welchen Nutzen CPC-Besitzer mit Multi¬ 
plan In der Praxis haben. 

200 Seiten/ca. 45 Abb. Best.-Nr.: 445 DM48,-* 


AUS DEM DATA-BECKER-AN6EB0T 
Das Floppybuch zum CPC 

Was man alles aus der DDI-1 des CPC 464, 
CPC 664 und CPC 6128 holen kann, zeigt die¬ 
ses Buch auf eindrucksvolle Weise. Neben den 
nötigen Erklärungen und einem ausführlichen 
DOS-Listlng gibt es zahlreiche Utilities: eine 
komfortable Dateiverwaltung, einen Disk- 
Manager. Selbst CP/M-Grundlagen und die re¬ 
lative Dateiverwaltung werden erklärt. So tindet 
wirklich jeder CPC-Besitzer In diesem Buch ei¬ 
nen wertvollen Ratgeber. 

422Seiten Best.-Nr. 412 DM49,-* 

Das CP/M-Trainingsbueh 
zum CPC 

Beherrschen Sie CP/M. Dieses Buch hilft Ihnen 
dabei. Von den ersten Schritten bis zum perfek¬ 
ten Umgang. Dabei werden natürlich die Versio¬ 
nen 2.2 und 3.0 für Schneider CPC 464.664 und 
6128 berücksichtigt. Dieses CP/M- 
Trainingsbuch bietet ein wenig mehr als ande¬ 
re: zum Beispiel Hillsprogramme, mit denen Sie 
in der Lage sind, auch fremde Diskettentorma¬ 
te zu lesen oder Submit-Dateien zu erstellen. 
260 Seiten Best.-Nr. 413 DM49,-* 


Das Maschinensprache¬ 
buch zum CPC 

Wer seinen CPC wirklich beherrschen will, der 
muß sich mit dem Thema Maschinensprache 
beschäftigen. Von den Grundlagen bis zur Pro¬ 
grammierung des Z80-Prozessors. Das Maschi¬ 
nensprachebuch zum CPC hilft Ihnen von An¬ 
fang an, Mit einer genauen Beschreibung aller 
Befehle und ausführlichen Beispielen, mit Hin¬ 
weisen zur Benutzung der Systemroutinen und 
einem Assembler/Disassembler sowie einem 
Monitor zum Abtippen. So macht der Elnstieq 
Spaß. 

330 Seiten Best.-Nr. 415 DM 39,-* 

Das große Grafikbuch 
zum CPC 

Dieses Buch ist tür alle, die bisher dachten, 
spektakuläre Grafik auf dem CPC sei nicht mög¬ 
lich. Zwei Top-Autoren beweisendes Gegenteil: 
Mit CPC-Chart - dem Diagrammgenerator, mit 
Destroyed - dem Arcade-Game, mit CPCs World 
- dem 3-D-Animationsprogramm, mit Vektorgra¬ 
fik. mil Sprites... Ja. Sie haben richtig gelesen: 
Wir reden von den Grafikmöglichkeiten Ihres 
CPC - inklusive 6128 und Joyce. 

589 Seiten Best.-Nr. 416 DM49,-* 


Programmwissen pur 
im Westentaschenformat 

Führer zum CP/M Best.-Nr. 452 dm 19 , 80 * 


Das große Buch der Public-Domain-Software 
Freie CP/M-Programme für 
Commodore 128, 
Schneider CPC und Joyce 

Public-Domain-Software setzt sich inzwischen 
auch in Europa durch. Diese Programme tragen 
kein Urheberrecht und dürfen deshalb mit Hob¬ 
byfreunden getauscht werden. Doch gerade die 
großen Sammlungen für das Betriebsystem 
CP/M enthalten neben wahren „Juwelen“ auch 
viel unbrauchbares Material. 

Der bekannte Fachjournalist Martin Kotulla hat 
es sich zur Aulgabe gemacht, die Idee der 
Public-Domain-Sottware auch in Deutschland 
populär zu machen, Aus den großen amerikani¬ 
schen Sammlungen hat er die interessantesten 
Programme herausgesucht, übersetzt, an 
Commodore- und Schneider-Computer ange¬ 
paßt und detailliert in diesem Buch dokumen¬ 
tiert. 

Mit einem Wertcoupon aus dem Buch erhalten 
Sie die Programme beim Autor zu einem beson¬ 
ders günstigen Preis. 

229 Seiten Best.-Nf.410 DM34,80* 

Das BASIC-Buch zum 6128 

BASIC macht Spaß. Man muß es nur richtig er¬ 
klärt bekommen. Und genau das tut das große 
BASIC-Buch zum CPC 6128. In diesem Buch 
steckt mehr als Einsteigerwissen: Variablen, 
Zahlensysteme, Bits und Bytes, Tokens, String¬ 
bearbeitung, Sortierung, Laufschrift, selbstde¬ 
finierte Zeichen, Windows, Fehlerbehandlung. 
Kopierschutz, Grafiken, Soundprogrammie¬ 
rung, relative Dateien .... Das verstehen wir un¬ 
ter Vielfalt. 

276 Seiten Best.-Nr. 461 DM39,-* 

CPC Hardware¬ 
erweiterungen 

Speziell tür den Hobbyelektroniker, der mehr 
aus seinem CPC machen möchte! Von nützli¬ 
chen Tips zur Platinenherstellung über Adreß- 
decodierung, Adapterkarten und Interfaces bis 
zur EPROM-Programmierboard und 
•Programmiernetzteil oder Motorsteuerung für 
Gleich- und Schrittschaltmotoren werden mach¬ 
bare Erweiterungen ausführlich und praxisnah 
beschrieben. 

445 Seiten Best.-Nr: 464 DM49,-* 


* Unabhängig von der Anzahl der bestellten Bücher berechnen wir 
für das Inland 4,- DM bzw. für das Ausland 6,- DM Porto und Ver¬ 
packung. Bille benutzen Sie unsere Bestellkarte. 
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[—Programm 


970 IF z = "J" THEN:CLS:GOSUB 780:GOTO 860 
980 CLS:GOTO 960 
990 1 

1000 ' Enddatum 

1020 CLS:GOSUB 770:L0CATE #1, 7.2:PR I NT#1 , 

ENDDATUM" _ _ . . 

1030 LOCATE #2,2,2:PRINT#2, Berechnet Endd 

atum nach gegeb." 

1040 LOCATE #2,2,3:PRINT#2,"Anfangsdatum u 
nd Tagesdifferenz" 

1050 PRINT:INPUT"Anf.-datum (als T.M.J) ;t 
u,mu,ju:t=tu:m=mu:j=ju:GOSUB 570:IF p=l TH 
EN 1050 

1060 INPUT"Differenztage .at.xr 

t<0 OR dt >100000 THEN 1060 

1070 GOSUB 460 „ „ 

1080 GOSUB 780:GOSUB 800:LOCATE #2,7,2:d-t 
u‘GOSUB 380:d=mu:GOSUB 380 

1090 PRINT#2,RIGHT$(STR$(ju),4); +";STR$( 

dt);" Tage":LOCATE #2,11,4 

1100 PRINT#2, = ";:d = t:GOSUB 380: d=m:GOS 

UB 380:PRINT#2,RIGHT$(STR$(j),4) 

1110 PRINT:PRINT“Noch eine Oifferenz zum g 

1120 PRINT"Anfangsdatum (J/N)?":PRINT:GOSU 
8 300:IF z="J" THEN 1060 
1130 IF z="N" THEN 1150 

1140 CLS:GOTO 1110 M 

1150 PRINT"Noch ein Anf.-datum (J/N)? : GOS 

UB 300:IF z = "J" THEN 1050 
1160 IF z="N" THEN GOSUB 770:GOTO 180 
1170 ' 

1180 ' Wochentag 

1190 ' 

1200 CLS:GOTO 1150 

1210 CLS:GOSUB 770:L0CATE #1,7,2:PRINT#1, 

WOCHENTAG" . _ ., 

1220 LOCATE #2,9,7:PRI NT#2, Ende mit (T,M, 
j) = 0,0,0" 

1230 INPUT"Ihr Datum (als T,M,J)";t,m,j:IF 
t=0 AND m=0 AND j=0 THEN GOSUB 770:G0T0 1 
80 

1240 GOSUB 570:IF p=l THEN 1230 
1250 GOSUB 710:CLS:GOSUB 800:PRINT:FOR 1=1 
TO 31:PRINT"-";:NEXT:PRINT 
1260 PRINT“ ";: d=t:GOSUB 370:d=m:GOSUB 3 
70 

; z 


NEXT 

PRINT:GOTO 12 


1270 PRINT RIGHT$(STR$(j),4) 
w(w):FOR i=1 TO 31:PRINT"-"; 

1280 PRINT:PRINT:PRINT:PRINT 
30 

1290 ' 

1300 ‘ Jubi1aeumskalende r 

1310 ' 

1320 CLS:GOSUB 770:LOCATE #1,2,2:PRINT#1, 
JUBILAEUMSKALENDER" 

1330 LOCATE #2,2,2:PRINT#2,"Berechnung von 
Daten Innerhalb" 

1340 LOCATE # 2 , 2 ,3:PRINT#2,"eines Interval 
1s ln besonderem" 

1350 LOCATE #2,2.4:PRINT#2,"Abstand von ei 
nem Ausgangsdatum" 

1360 PRINT:INPUT"Ausg.-datum (T,M,J) ;tu,m 
u , ju:t=tu:m=mu:j = ju:GOSUB 570 
1370 IF p=l THEN 1360 
1380 GOSUB 330:ru=r 

1390 PRINT:INPUT"Int.-anfang (T,M,J) ;ta,m 
a , ja:t = ta:m=ma:j= ja:GOSUB 570 
1400 IF p=l THEN 1390 

1410 GOSUB 330:ra= r:IF ra-ru<0 THEN 1390 
1420 INPUT"Int.-ende (T,M,J)";te,me,je:t 

=te:m=me:j=je:GOSUB 570 
1430 IF p=l THEN 1420 

1440 GOSUB 330: re=r:IF re-ra<0 THEN 1420 
1450 GOSUB 780 

1460 LOCATE #2,2,1:PRINT#2,"Ausgangsdatum 

";:d=tu:GOSUB 380:d=mu:GOSUB 380 

1470 PRINT#2,RIGHT$(STR$(ju),4):LOCATE #2, 

2,2:PRINT#2,"Intervall ";:d=ta 

1480 GOSUB 380:d=ma:GOSUB 380:PRINT#2,RIGH 

T$(STR$(ja),4);" - ";:d=te 

1490 GOSUB 380:d=me:GOSUB 380:PRINT#2,RIGH 

T$(STR$( je) ,4) ....... - CD r 

1500 LOCATE #2,2,4:PRINT#2, Ei nheiten: SPC 
(3)"(Wechsel: Diff.= 0)" 


Listing Kalender 


[2116] 

[ 985 ] 
[117] 
[641] 
[117] 
[3580] 

[4519] 

[5065] 

[5527] 

[3474] 

[968] 

[ 2927] 

[3144] 

[3130] 

[ 2949 ] 

[4907] 

[1373] 

[1013] 

[6036] 

[2790] 

[117] 

[1054] 

[117] 

[1037] 
[3313] 

[ 1994 ] 

[4461] 

[2167 ] 
[3613] 

[2698] 

[4643] 

[3411] 


[117] 

[1228] 

[117] 

[2928] 

[4288] 

[4377] 

[4451] 

[3298] 

[953] 

[ 1424] 
[2325] 

[1027] 

[3214] 

[2449] 

[ 1005] 
[2649] 
[921] 
[4446 ] 

[2726] 

[2606] 

[2390] 

[3539] 


Stun 


2 Mi nu 


: PRI N 


1510 LOCATE #2,2,5:PRINT#2,"Wochen 
den 3 Sekunden 5" 

1520 LOCATE #2,2,6:PRINT#2,"Tage 
ten 4 Ende 6" 

1530 fa=ra-ru:fe=re-ru 

1540 CLS:PRINT"Welche Einheit (Nr.)? 

T:GOSUB 300 

1550 e=ASC(z)-48:IF e<l OR e>6 THEN 1540 
1560 ON e GOTO 1570,1580,1590,1600,1610,16 
20 

1570 1a=INT(fa/7):ie=INT(fe/7):GOSUB 1680: 
dt = d* 7:GOTO 1740 

1580 1a=fa:1e=fe:GOSUB 1680:dt=d:GOTO 1740 
1590 ia=fa*24:ie=fe*24:GOSUB 1 680:dt=I NT(d 
/24):GOTO 1740 

1600 1a=fa*1440:ie=fe*1440:GOSUB 1680 :dt-I 
NT(d/1440):GOTO 1740 

1610 1a=fa*86400:1e=fe*86400:GOSUB 1680:dt 
=1NT(d/86400):GOTO 1740 

1620 PRINT:PRINT"Neues Intervall (J/N)?":G 
OSUB 300:IF z="J" THEN 1390 
1630 IF z="N" THEN PRINT:GOTO 1650 
1640 CLS:GOTO 1620 

1650 PRINT"Neues Ausgangsdatum (J/N)?":GOS 
UB 300:IF z=" J" THEN CLS:GOTO 1360 
1660 IF z=”N" THEN GOSUB 770:GOTO 180 
1670 CLS:GOTO 1650 

1680 PRINT"Im Intervall sind die ";ze(e) 

1690 PRINT" " ;1a;" - ";1e 

1700 PRINT"Di ff.1n " ;ze(e ) ; :INPUT zd:d-VAL 
(zd) 

1710 IF d < = 0 THEN PRINT:GOTO 1540 

1720 IF d<1a OR d>ie THEN PRINT:PRINT Nich 

t Im Intervall 1 ": PRINT-.GOTO 1560 

1730 RETURN 

1740 GOSUB 460:GOSUB 710:CLS:GOSUB 800 
1750 FOR 1=1 TO 31:PRINT"-”;:NEXT:PRINT 
1760 PRINT d;ze(e);“ am ";:d=t:GOSUB 370:d 
=m:GOSUB 370:PRINT RIGHTS(STR$(j),4) 

1770 PRINT TAB(10);zw(w) 

1780 FOR 1=1 TO 31:PRINT; 

INT 

1790 GOTO 1560 
1800 1 

1810 ' Gruppenalter 

1820 ‘ 

1830 CLS:GOSUB 770:L0CATE #1 
GRUPPENALTER" 

1840 LOCATE #2,3,2:PRINT#2,"Gesamta1ter ei 
ner Gruppe von" 

1850 LOCATE #2,7,4:PRINT#2,"Personen (maxi 
mal 20)" 

1860 PRINT:INPUT"Wievlel Personen ;np:np=I 
NT(np):IF n p <1 OR np>20 THEN 1860 
1870 PRINT:FOR ig=l TO np 
1880 PRINT"Geb.-tag";1g;:INPUT"(T.M.J) 
m,j:GOSUB 570 
1890 IF p=l THEN 1880 
1900 GOSUB 330 :rg(ig)=r:NEXT 
1910 PRINT:INPUT"Pruefber.-Anf.(T,M,J) 
m, j:GOSUB 5 70 
1920 IF p=l THEN 1910 

1930 GOSUB 330:nb=0:FOR 1g=l TO np:nb=nb+r 
-rg(ig):NEXT 

1940 PRINT TAB(10);" = ";INT(nb/3.6525 + 0.5 ) / 
100;"Jahre":PRINT 

1950 INPUT"W1eviel Jahre (Ende=0)";jg:IF j 
g = 0 THEN 2010 

1960 dt=INT((jg*365.2425-nb)/np):IF dt<0 0 
R dt>100000 THEN 1950 

1970 tu=t:mu=m:ju=j:GOSUB 460:GOSUB 710:G0 
SUB 780:GOSUB 800 

1980 LOCATE #2,5 , 2:PRINT#2,jg;"Jahre am ; 
:d=t:GOSUB 380:d=m:GOSUB 380 

1990 PRINT#2,RIGHT$(STR$(j),4):LOCATE #2,1 
3,4:PRINT # 2,zw(w) 

2000 t=tu:m=mu:j=Ju:GOTO 1950 

2010 PRINT:PRINT"Pruefber.-anf.aendern (J/ 

N)?":GOSUB 300:IF z="J" THEN 1910 
2020 IF z="N" THEN 2040 
2030 CLS:GOTO 2010 

2040 PRINT:PRINT"Noch eine Gruppe (J/N)?": 
GOSUB 300:IF Z="J" THEN 1860 
2050 IF z="N" THEN GOSUB 770:GOTO 180 
2060 CLS:GOTO 2040 
2070 MODE 1:END 


Listing Kalender 


[3641] 
[3653] 


:NEXT:PRINT:PR 


5,2:PRINT# 1 , " 


; t, 


; t, 


[ 374] 
[2643] 

[2113] 

[1636] 

[4536] 

[1663] 
[3270] 

[2825] 

[2665] 

[4223] 

[ 1670] 

[ 847 ] 
[5433] 

[2790] 

[833] 

[4494) 

[ 754] 
[3513] 

[2150] 

[6333) 

[ 555] 
[2624] 
[1613] 
[4392] 

[ 783] 
[2238] 

[ 387] 
[117] 

[ 673 ] 
[117] 
[2731] 

[3635] 

[4048] 

[4390] 

[ 1132] 
[3221] 


[961 ] 

[1423] 

[3846] 

[1178] 

[3018] 

[2267] 

[3799] 

[3832] 

[ 2969 ] 

[3233] 

[3244] 

[286] 

[6277] 

[ 1403] 

[824] 

[ 2110 ] 

[2790] 
[ 842 ] 
[648] 
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BASIC-Compiler für CPC 464/664/6128 

Der Turbo-Antrieb für Ihre BASIC-Programme! 


Haben auch Sie sich schon immer gewünscht, daß Ihre selbstgeschriebenen BASIC- 
Programme schneller laufen? Mit dem BASIC-Compiler von DMV ist das nun kein Problem 
mehr, denn 


- der Compiler hat den vollen Sprachumfang des 
BASIC 1.1 (CPC664/6128). 

- das compilierte Programm ist auf jedem CPC lauffähig. 

- unterstützt Integer- und Fließkomma-Arithmetik. 

- ist kompatibel zu Vortex-Peripherie inkl. Nutzen der 
RAM-Disk. 

- Programme, die spezielle BASIC-1.1.-Befehle beinhalten, sind 
auch auf dem CPC464 lauffähig (außer FILL und MASK). 

- der Compiler arbeitet unter CP/M, das heißt, alle CP/M- 
Dienstprogramme können genutzt werden. 

- bis 17 kByte Quellcode können problemlos compiliert werden. 

- einzelne Programmteile können ebenfalls compiliert werden 
(z.B. wichtig bei Nachladeprogrammen). 


- die ausführliche deutsche Bedienungsanleitung macht Sie auf 
einfache Weise mit dem Umgang des Compilers vertraut. 

- viele Beispielprogramme veranschaulichen die Arbeitsweise des 
Compilers und zeigen die Geschwindigkeitsvorteile auf. 

- das Programm ist in 100% Maschinencode geschrieben. 

Der BASIC-Compiler ist nur auf 3“-Diskette erhältlich. 

Best.-Nr : 209 Preis 49,- DM* 

Bitte benutzen Sie die Bestellkarte. 


Möchten Sie gerne in Assembler programmieren ? 

CPC Assembler Software und Trainingsbuch 


Das Buch: 


führt den Anfänger schrittweise in die Programmierung des Z80 ein. Dabei werden 
Vorkenntnisse nicht vorausgesetzt. Nach der Lektüre des Buches sind Sie mit dem 
Befehlssatz des Prozessors wie auch mit den Adressierungsarten vertraut. Anhand 
einer Fülle von Programmbeispielen, die speziell auf den CPC 464 zugeschnitten 
sind, lernen Sie, nützliche Routinen in Maschinensprache zu entwickeln, die auf 
Ihrem Rechner sofort lauffähig sind. Dazu erfahren Sie, wie Sie die im ROM des 
Schneider CPC vorhandenen Hilfsroufinen sinnvoll für die Lösung eigener Probleme 
einsetzen können. Darüber hinaus lernen Sie einige spezielle Programme zur 
Erweiterung des Betriebssystems mit leistungsfähigen grafischen Befehlen kennen, 
die Sie in BASIC verwenden können, z.B. TRIANGEL, BOX und CIRCLE. Ein umfang¬ 
reicher Anhang mit Erläuterungen des Befehlssatzes, des Assemblers sowie einer 
Vielzahl kommentierter Einsprungadressen des Betriebssystem-ROMs rundet das 
Buch ab. 

Die Software: 

besteht aus einem menügesteuerten Z80 - Assembler. 

Mit seiner Hilfe können Sie nicht nur die im Buch erläuterten Beispielprogramme editie¬ 
ren und in Maschinensprache übersetzen, sondern auch selbst entworfene Programme 
entwickeln und testen. Für Ihre Arbeit stehen Ihnen Funktionen zur Verfügung wie 

Einfügen - Löschen - Ändern von Programmzeilen - Abspeichern und Laden 
von Programmen auf Datenträgern wie Kassette und Diskette - Ausgabe von 
Listings auf Bildschirm und Drucker - Zahlenkonvertierung von der Menü-Ebene 
aus - Durchführung von Zwischenrechnungen mit binären, hexadezimalen und 
dezimalen Zahlen. Weiterhin erhalten Sie ein Trainingsprogramm, mit dessen Hilfe Sie 
den Umgang mit verschiedenen Zahlenformaten vertiefen können, und Programme zur 
Demonstration der grafischen Erweiterungen des Betriebssystems. 



Buch mit Kassette Best.-Nr.: 446 Preis 39,- DM* 
Buch mit Diskette Best.-Nr.: 447 Preis 49,- DM* 


* Unabhängig von der Anzahl der bestellten Programme berechnen wir für das Inland 4,- DM bzw. für das Ausland 6,- DM Porto und Verpackung. 

Bitte benutzen Sie die Bestellkarte. 
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dBASE verständlich 

Einsteigerkurs für das bekannte 
Datenbankprogramm 

Im ersten Teil wurden die Grundlagen und Vorzüge von dBASE zu anderen 
Programmen erläutert. Weiterhin konnte man etwas von der Entstehungs¬ 
geschichte von dBASE erfahren. Der zweite Teil soll eine Hilfe bei der In¬ 
stallation von den Programmteilen sein. 


Die Inbetriebnahme von dBASE 

Wir haben bereits erläutert, daß wir in 
diesen Beiträgen von dBase II ausgehen 
wollen. Dieses Programm ist heute so 
preisgünstig zu haben, daß der Einstei¬ 
ger seine ersten Versuche immer damit 
machen sollte. 

Merkt er, daß das Programm für seine 
Zwecke geeignet ist, und steht ihm ein 
16-Bit-PC zur Verfügung, so kann aus 
dem Einsteiger ein Aufsteiger werden, 
der sich zweckmäßig die Version III 
Plus zulegt. 

Wir werden in dieser Beitragsreihe auf 
Änderungen und Verbesserungen bei 
der Version III/III Plus hinweisen, um 
diesen Aufstieg zu erleichtern. 

Wer nur einen 8-Bit-Computer zur 
Verfügung hat, muß bei dBase II blei¬ 
ben. Man kann aber auch auf dem CPC 
und JOYCE durchaus professionell mit 
dBase arbeiten. 

Sinnvoll ist auf jeden Fall von Anfang 
an die Verwendung von zwei Laufwer¬ 


ken. Im Laufwerk A befindet sich dann 
die Diskette mit den Programmen. Für 
dBase II sollte sie folgende Programme 
enthalten: 

DBASE.COM 

DBASEOVR.COM 

DBASEMSG.TXT 

Da der CPC und der JOYCE unter 
CP/M keinen blinkenden Cursor besit¬ 
zen, ist ein entsprechendes Hilfspro¬ 
gramm empfehlenswert. Ebenso stellt 
man zweckmäßig die Tastaturbelegung 
für Textverarbeitung und den Bild¬ 
schirm für deutsche Umlaute ein. 

(SETKEYS KEYS.WP und LAN- 
GUAGE 2) 

Diese Hilfsprogramme kann man in 
eine PROFILE-Datei einfügen. 

Alle diese Programme gehen auf eine 
3-Zoll-40-Spur-Diskette, und für die 
Dateien ist dann auf einem 5 1/4-Zoll- 
Laufwerk B genügend Platz. 

Hat man nur ein Laufwerk, so kann es 
allerdings eng werden, denn die Datei¬ 


en müssen auch noch auf die Diskette. 
Unter MS-DOS ist das mit 720 kByte 
kein besonderes Problem. Auch mit 
360 kByte (2 x 40 Spuren) kann man 
noch halbwegs arbeiten. Mit 1 x 40 
Spuren (CPC und JOYCE) muß man 
die Programmdiskette abspecken (Da¬ 
tei DBASEMSG.TXT weglassen). 
Aber auch dann ist nur noch Platz für 
ein paar magere Beispieldateien. Profi¬ 
mäßig geht’s dann nicht mehr. 

Als Übungsbeispiel werden wir die be¬ 
reits beschriebene Datenbank einer 
Versicherungsagentur verwenden. Da 
in dBase II nur zwei Dateien gleichzei¬ 
tig “geöffnet” sein können (wir werden 
noch sehen, was das genau bedeutet), 
beschränken wir uns auf die Kunden- 
und die Vertragsdatei. 

Mit einigen Tricks kann man in dBase II 
auch mehr als zwei Dateien gleichzei¬ 
tig bearbeiten. Einfacher ist es in III/III 
Plus, denn hier können bis zu zehn Da¬ 
teien gleichzeitig geöffnet sein. Das ist 
ein wesentlicher Pluspunkt bei der Be¬ 
arbeitung praktischer Probleme. 

Wir wollen noch folgendes verab¬ 
reden: 

Alle Kommandos, die wir künftig ein¬ 
geben, werden mit Großbuchstaben 
dargestellt. (Beispiel: DBASE, ERASE 
usw.) 

Zum Abschluß eines Kommandos 
(oder einer ganzen Kommandozeile) 
muß natürlich immer die RETURN 
(ENTER) Taste betätigt werden. Wir 
werden darauf nicht besonders hin- 
weisen. 

Der Start von dBASE 

Um dBase zu starten, muß zunächst das 
Betriebssystem (CP/M bzw. MS-DOS) 
aufgerufen werden. 

Dann gibt man das Kommando: DBA¬ 
SE ein. 

Das Programm fordert dann zur Einga¬ 
be des Datums auf. Drückt man nur die 
RETURN-Taste, so geht es zwar auch 
weiter, aber für die spätere Dokumen¬ 
tation ist das Datum doch sehr nützlich, 
also geben wir es ein. 

Ist die Eingabe falsch, so fordert die 
deutsche Übersetzung (Druckfehler bei 
der Version 2.41 von M&T) eines eng¬ 
lischen Kinderverses zur Korrektur. 
Dann erfährt man, mit welcher Version 
man es zu tun hat und kann eventuell 
noch einen überflüssig langen “disclai- 
mer“ studieren. 

Endlich kommt das, worauf es an¬ 
kommt, nämlich ein 
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Das ist der berühmte dBase “prompt“ 
(so wie bei CP/M das “ > “) als Bereit¬ 
schaftszeichen zur Eingabe eines Kom¬ 
mandos. 

Geben Sie als erstes ein: ERASE und 
der Bildschirm wird gelöscht. Es bleibt 
nur der Prompt übrig. 

(Bei III/III Plus lautet das Kommando 
CLEAR. In dBase II hat dies eine ande¬ 
re Bedeutung, wie wir noch sehen 
werden.) 

Wenn Sie zwei Laufwerke verwenden, 
so geben Sie jetzt ein: 

SET DEFAULT TO B 

Das ist ein Beispiel für das SET-Kom- 
mando. 

Es wird die Voreinstellung für den “de- 
fault“ drive geändert. Nach dem Start 
sucht dBase nicht nur die benötigten 
Programmdateien, sondern auch alle 
aufgerufenen Datendateien in dem 
Laufwerk, von welchem es gestartet 
wurde (hier also A). 

Nach Eingabe des obigen SET-Com- 
mands ist dann Drive B das Standard¬ 
laufwerk für die Datendateien. 

Sie können im SET-Command für die 
Laufwerksbezeichnung auch “B: “ ein¬ 
geben — müssen es bei dBase aber 
nicht. 

Es gibt aber eine andere Möglichkeit, 
die Sie gleich ausprobieren sollten: 
dBase hat ein "eingebautes" Handbuch 
mit dem Kommando HELP. Dieses 
ruft die Datei DBASEMSG.TXT auf 
(wenn sie auf Ihrer Programmdiskette 
vorhanden ist - siehe oben). Dann er¬ 
halten Sie Information über jedes ge¬ 
wünschte Kommando (soweit vor¬ 
handen!) 

Geben Sie also ein: HELP SET und 
schauen Sie sich das Ergebnis an. 

Ein weiteres wichtiges Kommando, 
nämlich die Beendigung einer “dBase- 
Sitzung“. Geben Sie ein: QUIT und es 
meldet sich wiederdas Betriebssystem. 

Erstellen der Datenbank 


Wir starten dBase, wählen das default- 
Laufwerk und beginnen mit der Datei 
KUNDEN. 

In Abb. 1 (siehe Heft 10/89) hatten wir 
diese Datei als Tabelle dargestellt, und 
wir haben auch oben bereits auf die 
Struktur dieser Datei hingewiesen. 

Bei der Erstellung einer Datei unter 
dBase müssen wir dem Programm zu¬ 
nächst die Struktur der Datei mitteilen, 
bevor wir die einzelnen Felder der Sät¬ 


ze mit Inhalt füllen können. Beides sind 
zwei getrennte Operationen. 

Zur Definition der Struktur geben wir 
ein: 

CREATE KUNDEN 

Wenn Sie den Dateinamen weglassen, 
fordert Sie das Programm zur Eingabe 
des Namens auf 

Jetzt fordert Sie dBase zur Eingabe der 
Satzstruktur auf. Es erscheint die je¬ 
weilige Feldnummer und Sie müssen 
Name des Feldes, Typ, Länge (und 
Anzahl der Dezimalstellen) angeben. 
Die Einzelangaben werden jeweils 
durch ein Komma getrennt. 

Der Name des Feldes ist in Abb. 1 als 
Spaltenüberschrift angegeben. Wir ha¬ 
ben oben bereits gesehen, daß er die 
“Attribute" des Satzes kennzeichnet. 
Sie können ihn passend wählen. (Nicht 
länger als zehn Zeichen, keine Umlau¬ 
te und Sonderzeichen.) 

Der Typ eines Feldes kann in dBase II 
sein: 

C für “Character“ — das Feld enthält 
eine beliebige Zeichenkette. 

N für “Numeric“ — das Feld enthält 
eine Dezimalzahl. Mit dem Inhalt des 
Feldes kann gerechnet werden. Bei nu¬ 
merischen Feldern muß die Anzahl der 
Dezimalstellen angegeben werden. 
Zur Trennung dient der Dezimalpunkt! 
L für "Logical“ — das Feld enthält eine 
“boolesche Variable“, welche nur die 
Werte T (true = wahr) oder F (false = 
falsch) annehmen kann. 

In III/III Plus gibt es noch die Feldty¬ 
pen date = Datum und memo (das ist 
ein Feld in dem beliebiger Erläute¬ 
rungstext gespeichert werden kann). 
Die CREATE-Maske sieht in dBase 


III/III Plus auch etwas anders aus und 
erleichert durch die Menüführung die 
Eingabe. 

Die Länge des Feldes müssen Sie na¬ 
türlich so wählen, daß alle in Frage 
kommenden Attribute Platz haben. 
Wenn Sie sich bei der Definition ver¬ 
tun, ist es nicht schlimm. Sie können 
die Struktur der Datei später jederzeit 
ändern. 

Wenn die Eingaben für ein Feld been¬ 
det sind, drücken Sie RETURN und die 
nächste Feldnummcr erscheint. Wenn 
kein Feld mehr zu definieren ist, geben 
Sie als Abschluß RETURN. 

Das Ganze sicht für unsere Datei KUN¬ 
DEN dann so aus: 

Feld Name, Typ, Länge, Dezimalstellen 

001 KUNDNR, 0,3 

002 NAME,C,20 

003 VORNAME,C, 10 

004 STRASSE,C,20 

005 ORT,C,20 

006 

Nach dem letzten RETURN fragt Sie 
das Programm, ob Sie jetzt Daten ein¬ 
geben wollen. Wir antworten hier zu¬ 
nächst mit N, weil wir noch einige Ei¬ 
genschaften von dBase studieren 
wollen. 

Das Laufwerk B (default-Laufwerk für 
Dateien!) läuft an, und die Datei KUN¬ 
DEN wird dort gespeichert. Dann er¬ 
scheint wieder der dBase-Prompt. 

Sie können sich die gespeicherten Da¬ 
teien ansehen, wenn Sie das Komman¬ 
do DISPLAY FILES verwenden. 

Sie erhalten folgende Ausgabe: 
Datenbank # Sätze Letzte And. 
KUNDEN DBF 00000 20/07/89 
Die Datei wurde also mit der Namens¬ 
erweiterung DBF (DBase File) gespei¬ 
chert. Sie enthält noch keine Sätze und 
das Datum entspricht Ihrer Eingabe. 


Tabelle: Cursorsteue¬ 
rung fiir APPEND- 
Kommando 


Tastenkombination 


Cursorfunktion 


CTRL - E oder CTRL - A ein Feld zurück 

CTRL - X oder CTRL - F zum nächsten Feld 

CTRL - S ein Zeichen zurück 
CTRL - D zum nächsten Zeichen 

CTRL - Y Feld löschen 

CTRL - V Einfügemodus EIN/AUS ("Wechselschalter' 
CTRL - G Zeichen unter Cursor löschen 
DELETE Zeichen links vom Cursor löschen 
CTRL - C Weiter zum nächsten Satz 

oder bearbeitete Satz wird gespeichert 
CTRL - Q Operation APPEND wird beendet 

der letzte Satz wird nicht gespeichert 
CTRL - W Operation APPEND wird beendet 

der letzte Satz wird gespeichert 
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I—Serie 


(Sie sehen, daß es sinnvoll ist, immer 
das Tagesdatum einzugeben.) 

Die Datei ist jetzt “geschlossen“, das 
heißt, sie ist zwar auf der Diskette vor¬ 
handen, aber im RAM-Speicher für 
dBase nicht mehr zugänglich. Wir 
“öffnen“ sie wieder, indem wir sie mit 
dem Kommando USE aufrufen: 

USE KUNDEN 

Jetzt wird die Datei wieder in das RAM 
geladen. (Bei einer größeren Datei al¬ 
lerdings nur “blockweise“, da diese als 
Ganzes dort keinen Platz hat.) Daß sie 
tatsächlich wieder greifbar ist, können 
wir mit dem Kommando 

DISPLAY STRUCTURE 

erkennen. Die Dateistruktur (und die 
Zahl der enthaltenen Sätze) wird auf 
dem Bildschirm angezeigt — natürlich 
genauso, wie wir es vorher mit CREATE 
definiert hatten. 

Wenn Sie bei der Eingabe von Kom¬ 
mandos Schreibarbeit sparen wollen, 
so können Sie diese abkürzen. Es ge¬ 
nügt zur Eindeutigkeit, wenn Sie die er¬ 
sten vier Buchstaben eines Kommandos 
eingeben, also z.B. DISP STRU. Wir 
werden auch in unserem Beitrag gele¬ 
gentlich davon Gebrauch machen. 
Natürlich dürfen Sie von Ihnen selbst 
definierte Zeichenketten, wie z.B. 
Datei- oder Feldnamen usw. nicht ab¬ 
kürzen. 

Bei fehlerhafter Eingabe eines Kom¬ 
mandos meldet sich das System mit der 
Frage “Korrigieren und wiederholen? 
(J/N)“. Bei “J“ ist eine Korrektur mög¬ 
lich. Bei “N“ wird das betreffende 
Kommando nicht ausgeführt. 

Das kann unter Umständen unange¬ 
nehm werden, wenn dies z.B. in einem 
Programm geschieht, welches dann un¬ 
kontrolliert weiterläuft. 

Merken Sie sich als “Notbremse“ die 
ESCAPE-Taste. Diese unterbricht jede 
laufende Aktion von dBase und bewirkt 
die Rückkehr zum Prompt. 

Es muß aber die “echte“ ESCAPE-Ta¬ 
ste sein, das heißt, die Tastaturbele¬ 
gung (CPC und JOYCE) muß entspre¬ 
chend erfolgt sein. Daß man mit SET 
ESCAPE OEF diese Notbremse auch 
abschalten kann, wollen wir nur er¬ 
wähnen. Dann hilft nur noch ein 
“Coldboot“ oder Auschalten des Rech¬ 
ners. 

Das Kommando DISP STRUC ist also 
ein einfaches Mittel um festzustellen, 
ob überhaupt eine Datei geöffnet ist. 


Wenn das nicht der Fall ist. so teilt es 
uns dBase mit. 

W'ir wollen nun unsere Datei KUN¬ 
DEN mit Sätzen “füllen“. Dazu ver¬ 
wenden wir ein Kommando, welches 
zu einer bereits vorhandenen Datei 
neue Sätze hinzufügt. Das funktioniert 
natürlich auch, wenn der erste neu ein¬ 
gegebene Satz der erste Satz überhaupt 
ist. 

Die Datei muß geöffnet sein (ist hier 
der Fall) und wir geben ein 

APPEND. 

dBase stellt uns jetzt eine recht komfor¬ 
table Eingabemaske zur Verfügung. Es 
wird die erste unbelegte Satznummer 
angezeigt und darunter für jedes Feld 
die Bezeichnung und der verfügbare 
Platz (zwischen den Doppelpunkten). 
Wenn Sie das “highlight“ stört, können 
Sie es — vor Eingabe von APPEND 
natürlich - mit SET 1NTENSITY 
OFF ausschalten. 

Zur Cursorsteuerung bei der Eingabe 
können Sie die in Tabelle 1 angegebe¬ 
nen Tastenkombinationen verwenden. 
Wenn Ihre Tastaturbelegung richtig 
gewählt ist. stehen Ihnen entsprechen¬ 
de Kombinationen mit den Pfeiltasten 
zur Verfügung. 

Für den ersten Satz sieht unsere Maske 
dann so aus: 

Satznummer 00001 
KUNDNR : 117: 

NAME :Zeisig : 

VORNAME :Anton : 

STRASSE :Adalbertstraße 12 : 

ORT :6700 Ludwigshafen : 

Beachten Sie noch folgendes: Jede 
Feldeingabe wird mit RETURN abge¬ 
schlossen. Bei Characterfeldern erfolgt 
die Eingabe linksbündig. Bei numeri¬ 
schen Feldern können Sie beliebig ein¬ 
geben, nach RETURN wird rechtsbün¬ 
dig gespeichert. 

Ist ein Feld gefüllt, so “piept“ es, und 
das nächste Feld wird auch ohne RE¬ 
TURN angesprungen. Das erste kön¬ 
nen Sie mit SET BELL OFF unter¬ 
drücken. (Normal ist ON.) Das zweite 
mit SET CONFIRM ON. (Normal ist 
OFF.) 

Nach dem RETURN für das letzte Feld 
kommt die Maske für den nächsten 
Satz. 

So geben Sie der Reihe nach sämtliche 
Sätze der Datei KUNDEN — entspre¬ 
chend Abb. 1 — ein. Wenn die Maske 
für Satz 25 erscheint, drücken Sie RE¬ 
TURN und die Eingabe ist beendet. 


Die Datei steht jetzt “gefüllt“ im Spei¬ 
cher. Sie ist noch offen, wovon Sie sich 
mit DISP STRUC überzeugen können. 
Um die gefüllte Datei zu speichern, 
müssen Sie sie “schließen“. 

Dazu geben Sie das Kommando CLEAR 
ein. Das ist außerordentlich wichtig! 
Wenn Sie das versäumen, so besteht 
die Gefahr, daß Ihre Arbeit umsonst 
war, weil die gefüllte Datei nicht ge¬ 
speichert wurde. 

In dBase /////// Plus schließen Sie eine 
Datei mit CLOSE, weil CLEAR den 
Bildschirm löscht. (dBase II = 
ERASE.) 

Mit dem Kommando DISP FILES kön¬ 
nen Sie sich jetzt überzeugen, daß die 
mit 24 Sätzen gefüllte Datei auf der 
Diskette steht. 

Dazu müssen wir sie zunächst wieder 
“öffnen“ (in das RAM holen) mit dem 
Kommando: 

USE KUNDEN 

Die ersten Ko m mandos zu r 
D ateiverarbeitun g 

Schauen Sie sich ruhig mit DISP 
STRUC nochmal die Struktur an. 

Jetzt geben Sie das Kommando: LIST. 
Die gesamte Datei wird auf dem Bild¬ 
schirm aufgelistet. Als erstes steht bei 
jedem Satz die Satznummer, die wir ja 
von der Eingabemaske her kennen. 
Wenn das stört, so geben Sie ein LIST 
OFF und die Ausgabe der Nummer 
wird unterdrückt. 

Für das Programm dBase ist diese Satz¬ 
nummer außerordentlich wichtig. Bei 
einer geöffneten Datei ist ein interner 
“Zeiger“ immer auf eine bestimmte 
Satznummer gerichtet. Dieser Satz ist 
dann “im Zugriff“. 

Diesen im Zugriff befindlichen Satz 
können Sie sich ansehen mit dem Kom¬ 
mando: 

DISPLAY (Satznummer wird ausge¬ 
geben) oder 

DISPLAY OFF (Satznummer wird 
nicht ausgegeben). 

Nach dem Öffnen einer Datei ist es im¬ 
mer der erste Satz am “Top“ der Datei. 
Wenn das Programm auf einen anderen 
Satz zugreifen soll, so muß der interne 
Zeiger geändert werden. 

Wie es mit dem LIST-Befehl weiter¬ 
gehl, erfahren Sie in der nächsten Aus¬ 
gabe, wo es auch heißt: “Wie ändere 
ich Datensätze?“ 

(Hans-Georg Sanner/cd) 
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Die verrücktesten Sportarten auf einem Sampler! 

California Games, Supersports. 

__ Galactic Games, Altern. 

O m Q O World Games P 

III O Best ' Nr ' 766 37,90/39,90 \j \ 


craz 


SAMPLERS 


Dominator 
Best.-Nr. 680 

29 , 90 / 39,90 

Forgotten Worlds 

Best.-Nr. 681 

29 , 90 / 39,90 

Lizenz zum Töten 

Best.-Nr. 683 

32 , 90 / 44,90 

Purple Saturn Day 

Best.-Nr. 614 

32 , 90 / 44,90 

Rick Dangerous 
Best.-Nr. 686 

29 , 90 / 39,90 

Skyweek 
Best.-Nr. 687 

29 , 90 / 39,90 

Supertrux 
Best.-Nr. 689 

32 , 90 / 44,90 

The Story so far II 
Best.-Nr. 690 

/ 42,90 

Thunderbird 
Best.-Nr. 691 

35 , 90 / 39,90 

Timescanner 
Best.-Nr. 692 

29 , 90 / 39,90 

Track Suit Manager 

Best.-Nr. 693 

29 , 90 / 


SIERRA 

macht den 
PC zum 
Abenteuer- 
Spielplatz 


PC-Sierra-Adventures... 

(wahlweise auf 3,5"- oder 
5,25'-Diskette) 


Goldrush Best- 

King’s Quest l/ll/lll Best.- 
(Tnplepack) 

King's Quest IV Best.- 
Leisure Suit Larry I Best.- 
Leisure Suit Larry II Best.- 
Manhunter Best.- 

Police Quest I Best.- 
Police Quest II Best.- 
Space Quest I Best.- 
Space Quest II Best.- 
Space Quest III Best. - 


Lösung(en) 

Bei uns gibt’s für sämtliche 
hier angebotenen Sierra- 
Adventures Komplett¬ 
lösungen! 

Jede einzelne Lösung 

kostet JA AM 

schlappe 12.- DIVI 

Clevere Rechner bestellen 
sich unser attraktives Ring¬ 
buch komplett 
mit allen 13 Lösungen für 

sagenhafte yg DIVI 

Kult-Lösung OfA 


Soccer Spectacular 

Footballman. II, Peter Beardsley, Pe¬ 
ter Shilton, World 
Champs. Soccer Supremo 
Best.-Nr.695 37 . 90 / 49.90 

Special Action 

Capt. Blood, Vindicator 
(Imagine), Driller, D.T. Olympic 
Challenge, S.D.I. (Activision) 

Best.-Nr. 696 42.90/52.90 

FlightACE 

Advanced Tactical Fighter.Toma- 
hawk, Strike Force, Harrier. Speedfire 
40, ACE, Airtraffic, Combat 
Best.Nr. 496 39.90/49.90 

Karate ACE 

Way of the Tiger, Samurai Trilogie, 
Bruce Lee, Kung Fu Master, 
Exploiding Fist, Avenger, 

Uchi Mata 

Best.Nr. 443 37.90 / 39.90 

Gold, Silver, Bronze 

Summergames I, Summergames II 
Wintergames 

Best.Nr. 450 39.-/59.- 

Space ACE 

Xevius, Venon Strikes Back, 
Cybernoid, North Star, 

Zynaps, Trantor, Exolon 

Best Nr 508 37.90/44.90 

10 Computer Hits Vol. 5 

Dark Septer, Tarzan, Catch 23, 
Mistery of the Nife, Endurance, Mega 
Apocalypse, Ninja Master, Activator, 
The Boggit, Enlightment (Druid II) 

Best.Nr. 567 35.90/49.90 

Ten Mega Games 

North Star, Cybernoid, Deflector, 
Trailblazer, Bloodbrother, MASK II, 
Tour de Force, Hercules, Masters 
of the Universe, Blood Valley 
Best.Nr. 504 37.90/39.90 

Supreme Challenge 

Elite, Sentinel, Starglider, 

ACE II.Tetris 

Best. Nr. 500 37.90/44.90 

Game, Set & Match II 

Super Hang on, Davis’ Snooker, 
Basket Master, Superball, Track & 
Field, Matchday II, Championship 
Sprint 

Best Nr. 497 37.90/49.90 


Crazy Cars II 

Best.-Nr. 583 29 , 90 / 39,90 

E. Hughs Int. Soccer 

Best.-Nr. 634 29 , 90 / 39,90 

Footballmanager II 

Best.-Nr. 421 29 , 90 / 39,90 

Footballmanager II 

- Expansionkit 

Best.-Nr. 600 25 , 90 / 32,90 

Last Ninja II 

Best.-Nr. 472 35 , 90 / 39,90 

Microprose Soccer 
Best.-Nr. 633 39 , 90 / 49,90 

New's Copy/Stars Copy 
Best.-Nr. 445 / 39,90 

Das Reich 

Best.-Nr. 516 / 49,90 

Times of Lore 

Best.-Nr. 632 29 , 90 / 39,90 


Mit Erscheinen dieser Anzeige werden unsere früheren Preislisten und Angebote ungültig! 


Action Fighter 

Best.-Nr. 767 29,90/39,90 

■ Batman The Movie 

Best.-Nr. 768 32.90/42,90 

Beach Volley 

Best.-Nr. 769 32.90/42.90 

■ Bloodwych 

Best.-Nr. 770 32,90/42,90 


Gemini Wing 
Best.-Nr. 771 

Indiana Jones 
(Action Version) 
Best-Nr. 772 
Passmg Shot 
Best,-Nr. 773 


29,90/39,90 

29.90/39,90 

32.90/42,90 


Rambow Island 
Best.-Nr, 774 

Shinobi 
Best.-Nr. 775 

Silkworm 
Besl.-Nr, 776 


29,90/39.90 

31,90/41.90 

29.90/39.90 


Newzealand Storv 

Best -Nr. 760 32,90/43,90 


Summer-Edition 

Best.-Nr 761 29.90/39.90 


DAUERHITS 


Rodeo-Games 
- Buffalo Bill - _ 

BesL-Nr. 759 " 29,90/39.90 


Der Versand mit den teuflischen Preisen! 


@0 7252/866 99 

Bestellannähme 24 Stunden. Von 13.00-16.30 Uhr erreichen Sie uns persönlich 

Software-Bestellschein 

Ich bestelle aus dem Diabolo-Versand 

folgende Software (Best.-Nr. angeben!): Kunden-Nummer 
PC 11/89 
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r~ Assembler 



, A ;und abspei ci. 


HL ;Argumentadr. retL 

HL.STARTW;Iter.-Startwert 1 ,, 
j DE,REAL 1 ;nach REAL1 kopieren 
-DBC,5 ;5 Bytes 

LDIR juebertragen 

POP HL ;Argumentadr . holen 

'LD B,4 ;4 Iterationen 


ITER PUSH BC;Zaehler retten 
PUSH HL ;Argumentadr. retten 

LD DE.REAL2 ;Argument nach REAL2 
.5 ;kopieren 

REAL2 ;REAL2/REAL1 berechnet 
REAL1 



LL FDIV 
DE , REAL 1 


REAL2+REAL1 berech 


PADD 


: AL2 ; Ad r . REAL2 
: R E A L 2 / 2 1 


Tasten-Nummwn 

vuvu«rt-\nAftMm\nrirtAftfViAniuwvvv\nnn'* n - \ 


DaaaaatsraaaQciai 
raanoDaaaraacaaa 
—nanaaaaaDoaai 





§j 

Ü 


Die Assemblerecke 

Verbotene Z80-Früchte 


Die Planung und Konstruktion eines Mikroprozessors ist eine komplizierte 
Angelegenheit. Im allgemeinen sind die Entwickler zufrieden, wenn das La¬ 
byrinth der Silizium-Schaltkreise alle vorgesehenen Funktionen fehlerfrei 
ausführt. Sie verschwenden keine kostbare Zeit damit, zu untersuchen, ob 
das Endprodukt noch zusätzliche Befehle beherrscht, die sich mehr oder 
weniger zufällig aus der Schaltlogik ergeben. Es bleibt dem findigen Com¬ 
puterfreak überlassen, solche ’illegalen’ Operationscodes zu ermitteln, die 
in keiner Herstellerdokumentation verzeichnet sind. 


Auch der im CPC und Joyce aktive 
Prozessorveteran Z80 enthält geheime 
Fähigkeiten, die sich in vielen Fällen 
nutzbringend verwerten lassen. Bevor 
wir dem vielbeinigen Siliziumkäfer ge¬ 
nauer auf den Zahn fühlen, sollten Sie 
einen kurzen Blick auf Tabelle 1 wer¬ 
fen, in der die hexadezimalen Opcodes 
für einige Assemblerbefehle aufgelistet 
sind. Das geübte Programmiererauge 
erkennt hier sofort eine gewisse Syste¬ 
matik: 

- Alle Befehle, die das IX- oder IY- 
Register verwenden, beginnen mit dem 
Code &DD bzw. &FD. 

- Das nachfolgende Byte ist mit dem 
Code identisch, den der entsprechende 
Befehl bei Verwendung des HL-Regi- 
sterpaares erzeugt. 

Das läßt einige Rückschlüsse auf die 
interne Struktur des Z80 zu: Es exi¬ 
stiert offenbar eine Art Schalter, der 
durch die Codes &DD und &FD akti¬ 


viert wird. Er sorgt dafür, daß der 
nachfolgende Opcode nicht wie vorge¬ 
sehen das HL-Register anspricht, son¬ 
dern quasi auf die Indexregister IX 
oder IY umgebogen wird. Nach Aus¬ 
führung des Befehls wird der Schalter 
automatisch in den Normalzustand zu¬ 
rückgesetzt. Durchforscht man den Be¬ 
fehlsvorrat des Z80, so kann man in der 
Tat feststellen, daß die meisten mit 
dem HL-Register möglichen Operatio¬ 
nen auch mit den Indexregistern funk¬ 
tionieren, wobei häufig noch ein Off¬ 
set-Byte für die indirekt-indizierte 
Adressierung hinzukommt (z.B. bei 
LD (IX + 3),A). 

Indexregister zweigeteilt 

Die Frage ist nun, was passiert, wenn 
man den Indexregister-Vorspann ei¬ 
nem Befehl voranstellt, der dafür ei¬ 
gentlich nicht vorgesehen ist. Zumin¬ 


dest in einigen Fällen hat dies erstaunli¬ 
che, aber bei genauer Betrachtung 
durchaus logische Konsequenzen. 
Alle Befehle, die das L- oder H-Regi- 
ster ansprechen (also nur das Low- 
oder Highbyte des HL-Registerpaa¬ 
res), können auf das Low- oder High¬ 
byte von IX und IY umgeleitet werden! 
Oder mit anderen Worten: Die Index¬ 
register nehmen nicht nur, wie offiziell 
angegeben, 16-Bit-Werte auf, sondern 
können auch in zwei 8-Bit-Register 
zerlegt werden, die wir im folgenden 
einfach mit XL und XH bzw. YL und 
YH bezeichnen. 

Den Geschwindigkeitsfanatiker (und 
damit jeden Assemblerprogrammierer) 
freut das natürlich ungemein. Für die 
Zwischenspeicherung wichtiger Bytes 
stehen ihm nun 4 zusätzliche ’Parkplät¬ 
ze" zur Verfügung, die er sonst irgend¬ 
wo im RAM-Speicher unterbringen 
müßte. Und da der prozessorinterne 
Datenverkehr wesentlich schneller ab¬ 
läuft als ein Speicherzugriff, läßt sich 
auf diese Weise in zeitkritischen Routi¬ 
nen so manche Mikrosekunde einspa¬ 
ren. Es bleibt jedoch ein kleines Pro¬ 
blem: Kaum ein Assembler versteht 
Befehle wie LD XL,3 oder ADD 
A,YH. Hier ist ein kleiner Kunstgriff 
notwendig, der von der Assemblerdi¬ 
rektive DB oder DEFB Gebrauch 
macht. Dieser ’Pseudobefehl’ schreibt 
einfach ein Byte in das Programm, 
ohne nach dem Sinn und Zweck zu fra¬ 
gen. Die Befehle LD XL,3 und ADD 
A,YH lassen sich damit auf folgende 
Weise eingeben: 

100 'DB &DD ;Umschaltung auf IX 
110 'LDL, 3 ;XL mit 3 ladenl 
120 'DB &FD ;Umschaltung auf IY 
130 'ADD A,H ;YH zu A addieren! 

Dieser Trick funktioniert bei allen Be¬ 
fehlen mit 1-Byte-Opcode, die L oder 
H verwenden. Im einzelnen sind das 
LD, ADD, ADC, SUB, CP, AND, 
XOR, OR, INC und DEC, wobei die 
Flags auf die übliche Weise beeinflußt 
werden. Zu beachten ist, daß die Um¬ 
schaltung immer auf den ganzen Befehl 
wirkt. Aus LD H,L wird zum Beispiel 
LD XH.XL; ein direkter Transfer zwi¬ 
schen IX und IY oder Index- und HL- 
Register ist also nicht möglich! 

Ein versteckter Schiebebefehl 

Doch damit ist die Ausbeute an illega¬ 
len Z80-Befehlen noch lange nicht er¬ 
schöpft. Neben dem Indexregister- 
Vorspann gibt es noch eine weitere Op- 
code-Regelmäßigkeit, der dem auf¬ 
merksamen Programmierer ins Auge 
lällt: Bis auf die Akku-Spezialbefehle 
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Assembler—i 



LD 

A,(HL) 

7E 





LD 

A,(IX+0) 

DD 

7E 

00 



ADD 

HL, HL 

29 





ADD 

IX, IX 

DD 

29 




JP 

(HL) 

E9 





JP 

(IY) 

FD 

E9 




RLC 

(HL) 

CB 

06 




RLC 

(IY+7) 

DD 

CB 

07 

06 

Tabelle 1: 






Einige Opcodes 

SET 

7,(HL) 

CB 

FE 



im Vergleich 

SET 

7,(IX-l) 

DD 

CB 

FF 

FE 


RRA, RLA, RRCA, RLCA werden 
alle Rotations- und Schiebeoperationen 
des Z80 mit zwei Bytes codiert. Als er¬ 
stes Byte erscheint konstant &CB; das 
zweite ist variabel und bestimmt die 
Art der Operation (RR, RL, SLA, SRA 
usw.) und das Register, das benutzt 
werden soll. Auch die Bitbefehle des 
Z80 (BIT, SET, RES) beginnen alle 
mit dem Code &CB. Er leitet Befehle 
ein, die beim Z80 gegenüber dem Vor¬ 
gängermodell, dem 8080-Prozessor, 
neu hinzugekommen sind, da nicht 
mehr genügend 1 -Bytc-Opcodes frei 
waren. 

Untersucht man die 256 Variations¬ 
möglichkeiten des auf &CB folgenden 
Bytes, so kann man festste!len, daß sie 
fast alle durch legale Kommandos ab¬ 
gedeckt werden. Nur der Bereich von 
&30 bis &37 ist Undefiniert und zieht 
damit das Interesse des Opcode-For- 
schers auf sich. Und nach geduldigem 
Probieren findet er in der Tat heraus, 
daß ein weiterer versteckter Schiebebe¬ 
fehl existiert, der bis auf eine Kleinig¬ 
keit dem legalen Befehl SLA (arithme¬ 
tisch links schieben) entspricht. Bei 
SLA wandern alle Bits eine Position 
nach links, was einer Multiplikation 
mit 2 entspricht (siehe auch Heft 
12/88). Das höchstwertige Bit fällt da¬ 
bei heraus; die freie Position rechts (Bit 
0) wird mit Null gefüllt. 

Werden jedoch die Opcodes im Be¬ 
reich &30 bis &37 verwendet, so er¬ 
scheint in Bit 0 eine 1, so als ob man auf 
SLA noch einen INC-Befehl folgen las¬ 
sen würde. Diese illegale Schiebeope¬ 
ration ist natürlich schneller als zwei 
einzelne Befehle und kann ebenfalls 
dazu dienen, an entscheidender Stelle 
Zeit zu sparen. Wie das zweite Byte 
nach &CB aussehen muß, damit ein be¬ 
stimmtes Register angesprochen wird, 
geht aus Tabelle 2 hervor. Die Bytes 
werden dem Assembler am besten in 
Form einer DB-Anweisung unterge¬ 
schoben, also z.B. so: 

100 'LD A,2 ;Akku mit 2 laden 
110 'DB &CB,&37 ;SLA/INC A 

wonach der Akku den Wert 5 enthält. 

illegal-indirekt-indiziert... 

Eine regelrechte Lawine illegaler Be¬ 
fehle entsteht bei einer genaueren Un¬ 


tersuchung der indirekt-indizierten Ro¬ 
tations-, Schiebe- und Bitbefehle. Zu 
dieser Sorte gehören z.B.: 

— RLC (IX+ 7): 8-Bit-Linksrotation 
der durch IX+7 adressierten Spei¬ 
che rstelle 

— SET 0,(IY-1): Setzen des Bit 0 in 
der durch IY-1 adressierten Spei¬ 
cherstelle 

Wie Tabelle 1 zeigt, werden diese 
Kommandos mit vier Bytes codiert und 
besitzen einen doppelten Vorspann: 
&DD bzw. &FD für die Auswahl des 
Indexregisters und dann &CB zur 
Kennzeichnung des erweiterten 
Z80-Befehlssatzes. Das dritte Byte be¬ 
stimmt den Offset im Bereich 
-128... 127, und das vierte Byte spezifi¬ 
ziert schließlich den Befehl. Die Varia¬ 
tionsmöglichkeiten dieses Bytes wer¬ 
den durch die legalen Opcodes jedoch 
nur zu einem kleinen Teil ausge¬ 
schöpft. Viele der illegalen Werte be¬ 
wirken einen erstaunlichen Effekt: 
Nach Manipulation einer Speicherstel¬ 
le via Indexregister wird das Resultat 
automatisch in ein Z80-Register gela¬ 
den! Eine Kombination wie 

100 'SRL (IX+0) ;Rechtsschieben 
110 ’LDA,(lX+0) ;Ergebnis nach A 

läßt sich also auf diese Weise mit einem 
einzigen Befehl erledigen! Um die da¬ 
zugehörigen Opcodes zusammenzuba¬ 
steln, geht man von folgendem Schema 
aus: 

- für IX: &DD &CB ofbr 

- für IY: &FD &CB ofbr 


of bezeichnet den Offset, der zu IX 
bzw. IY dazuaddiert werden soll; br 
bestimmt den Befehl und das Zielregi¬ 
ster für das Resultat. Die für br einzu¬ 
setzenden Werte können Sie Tabelle 3 
entnehmen. Will man die obigen bei¬ 
den Programmzeilen durch den äquiva¬ 
lenten illegalen Befehl ersetzen, so 
muß wieder die DB-Direktive aushel¬ 
fen: 

100 'DB &DD,&CB,&00,&3F 

Wie Tabelle 3 zeigt, läßt sich sogar der 
heimliche SLA/INC-Befehl illegal va¬ 
riieren - verbotener geht’s also nicht 
mehr, lassen Sie sich dabei auf keinen 
Fall erwischen! Der Testbefehl BIT, 
der ja auch noch in dieses Codeschema 
passen würde, weigert sich übrigens 
beharrlich, bei illegal-indirekt-indi¬ 
zierter Adressierung (typisches EDV- 
Sprachungetüm) ein Register zu laden. 
Versuche des Autors zeigten hier keine 
Ergebnisse. Es ist jedoch nicht auszu¬ 
schließen, daß es noch andere illegale 
Opcode-Kombinationen gibt, die sich 
für Programmiertricks verwerten 
lassen. 

Eine kleine Warnung sei an dieser Stel¬ 
le noch angefügt: Tllegalisierte’ Pro¬ 
gramme können sich in bestimmten 
Fällen als problematisch erweisen. So 
werden kompatible Prozessoren ande¬ 
rer Hersteller mit großer Wahrschein¬ 
lichkeit streiken, und auch ein CP/M- 
Emulator auf einem PC dürfte sich dar¬ 
an gründlich verschlucken. Solange Sie 
mit Ihren Programmen in der CPC/Jo- 
yce-Umgebung bleiben, ist die Ver¬ 
wendung illegaler Opcodes jedoch un¬ 
kritisch. 

Exotische Spezialitäten 

Zum Abschluß sollen noch einige exo¬ 
tische Kommandos besprochen wer¬ 
den, die dem offiziellen Repertoire des 


SLA/INC 

A 

CB 

37 

SLA/INC 

E 

CB 

33 

SLA/INC 

B 

CB 

30 

SLA/INC 

H 

CB 

34 

SLA/INC 

C 

CB 

31 

SLA/INC 

L 

CB 

35 

SLA/INC 

D 

CB 

32 

SLA/INC 

(HL) 

CB 

36 


Tabelle 2: 

Die Opcodes flir den 

kombinierten 

SLA/INC-Befehl 
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Z80 angehören, aber nur selten an¬ 
gewendet werden und deshalb vie¬ 
len Programmierern unbekannt 
sind. Vier Befehle operieren mit 
zwei sehr speziellen Z80-Registem, 
die beide 8 Bit breit sind: 

— Das R-Register (Refresh) ist ein 
Zähler und dient dazu, den Inhalt 
der RAM-Bausteine regelmäßig 
aufzufrischen. Es wird vom Prozes¬ 
sor fortlaufend um 1 erhöht, wobei 
das höchstwertige Bit 7 unbeeinflußt 
bleibt. Der Befehl LD R,A überträgt 
den Akkuinhalt ins R-Register, LD 
A.R befördert den Zählerstand in 
den Akku. 

Mit Hilfe dieser Kommandos regelt das 
CPC-Betriebssystem das Timing für 
den Kassettenbetrieb. Da zu einem be¬ 
liebigen Abfragezeitpunkt der Zähler¬ 
stand nicht vorhersagbar ist, kann die¬ 
ses Register Zufallszahlen für Spiel¬ 
programme oder ähnliche Zwecke lie¬ 
fern. 

— Das 1-Register (Interrupt) wurde ur¬ 
sprünglich vorgesehen, um auf fle¬ 
xible Weise Programmunterbre¬ 


chungen durch externe Geräte zu er¬ 
möglichen. Der CPC und Joyce 
werden jedoch in einem Interrupt¬ 
modus (IM 1) betrieben, in dem die¬ 
se Möglichkeit ohnehin nicht be¬ 
steht. Deshalb kann man das I- Regi¬ 
ster als Zwischenspeicher für 8-Bit- 
Werte benutzen. 

Der Zugriff ist wie beim R-Register 
nur über den Akku möglich, also mit 
LD A,I und LD I,A. Die Ausführungs¬ 
zeit ist länger als bei einem normalen 
Transfer zwischen zwei Registern, 
aber immer noch schneller als ein Spei¬ 
cherzugriff, so daß sich auch mit die¬ 
sem ’Datenparkplatz’ Zeit sparen läßt. 
Außerdem gibt es noch zwei sonderba¬ 
re Rotationsbefehle, die für die Mani¬ 
pulation binär codierter Dezimalzahlen 
(BCD) gedacht sind. In diesem Sy¬ 
stem, das übrigens von den meisten Ta¬ 
schenrechnern verwendet wird, reprä¬ 
sentieren jeweils 4 Bit (= 1 Nibble) 
eine Ziffer im Bereich 0..9. Diese Me¬ 
thode zwingt den Z80 etwas gewaltsam 
und zeitraubend zum dezimalen Rech¬ 
nen, vermeidet aber die Rundungsfeh- 


Tabelle 3: Das vierte 
Byte bei indirekt-in¬ 
dizierter Adressie¬ 
rung mit Transfer des 
Ergebnisses in ein 
Register 


ler der Binär-Dezimal-Umwandlung 
und ermöglicht eine größere Genauig¬ 
keit. Das umständliche Hantieren mit 
den halben Bytes wird durch die Nib- 
ble-Rotation erleichtert. 

RLD (Rotate left decimal) veranstaltet 
ein wahres Bäumchen-wechsle-dich- 
Spiel zwischen dem Akku und einer 
durch HL adressierten Speicherstcllc: 
Bit 0..3 A-> Bit 0..3 (HL) 

Bit 0.. 3 (HL) - > Bit 4 .. 7 (HL) 

Bit 4.. 7 (HL )-> Bit 0..3A 
Die obere Akkuhälfte bleibt also un¬ 
verändert. RRD (Rotate right decimal) 
funktioniert genau umgekehrt: 

Bit 0..3 A -> Bit 4.. 7 (HL) 

Bit 4.. 7 (HL) - > Bit 0.. 3 (HL) 

Bit 0..3 (HL) -> Bit 0..3 A 
Können Sie so etwas gebrauchen? Aber 
wie dem auch sei - ein Streifzug durch 
die exotischen Gefilde des Z80 ist eine 
interessante und spannende Angele¬ 
genheit. Und welcher Assemblerpro- 
grammicrer hat nicht den Ehrgeiz, sei¬ 
ne Maschine bis in den letzten Winkel 
zu erforschen und zu beherrschen? 

(Matthias Uphoff/cd) 
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CPC-ANWENDUNG 


ConText (mfük 

Autor: Matthias Uphntl 


Damit das Schreiben wieder Spaß macht 

Der Klassiker: 

ConText CPC - bis heute ungeschlagen in der Gruppe der Textverarbeitungen. 
Dieses Programm besticht vor allem durch seine leichte Anwendungsweise, die 
selbst unerfahrenen Compulerbesitzern den Umgang mit einer Textverarbeitung 
möglich macht, 

ConText CPC - das heißt: 

Einfachste Bedienung durch logische Tastaturbelegung: alle Funktionen sind Ober 
die Control- und eine definierte Taste zu erreichen, 

Funktionen wie EINFÜGEN. FLIESSTEXT, BLOCKFORMATIERUNG und KOPIE¬ 
REN sind über Tastendruck aulrufbar und werden in einer Statuszeilo angezeigt. 
Mehrspaltiges Schreiben und Textkopieren erleichtern Ihnen die Korrespondenz. 
25 KByte Textspeicher mit insgesamt 5 DIN-A4-Seiten. damit Sie auch lange Briefe 
problemloserstellen können. 

Voreingestelli für die meisten CENTRONICS-Drucker, durch übersichtliche 
Tabellenprogrammierung anpaßbar an viele EPSON-kornpalible Drucker. 
Wellerschreiben während des Drückens, denn 'time Is money'. 

Darstellung von Sonderschriften wie VERGRÖSSERN und UNTERSTREICHEN. 
Anzeigen von anderen Schriftarten durch Steuerzeichen 
Auf Diskette / Kassette gespeicherte Textbausleine sind überall Im Text plazierbar. 
Eingebauler Taschenrechner und Kalender, damit Sie den Überblick behalten. 

Dies sind nur einige der Möglichkeiten, die ConText Ihnen als Textverarbeitung 
bietet. 

Der benötigte Hardware-Aufwand ist gering. 

Sie brauchen nur einen CPC 464 I 664 oder 6128 und einen Drucker. Alles andere erklärt 
Ihnen die ausführliche deutsche Bedienungsanleitung, die dem Programm beillegt. 

Und wo gibt’s ConText CPC ? 

Bei DMV zu bestellen als 

3“-Diskette 
Kassette 


TurbO-DATA-CPC 

Volldampf in der Dateiverwaltung 

Brauchen Sie ein neues Adreßbuch oder Telefonverzeichnis? 
Müssen Sie Ihre Sammlungen von Briefmarken, Schallplatten. 
Dias oder anderen Schätzen sortieren? Alles kein Problem, wenn 
Sie für Ihren CPC eine universelle Dateiverwaltung haben, und die 
gibt’s jetzt beim DMV: 

Turbo-DATA-CPC ist die universelle Dateiverwaltung 
für jede Gelegenheit, mit der Sie problemlos Über¬ 
blick und Ordnung in alle Ihre Daten bringen kön¬ 
nen. Dabei helfen Ihnen die vielfältigen Funktionen 
von Turbo-DATA-CPC: 

- Universell durch veränderbare Ein- und Ausgabemasken 

- Blitzschnelle Suchfunktionen durch Indexfelder 

- Dateikapazität bis maximal 80 verschiedene Felder 

- Bis zu 19 Felder gleichzeitig auf dem Bildschirm sichtbar 

- Besonders schnelle und umfangreiche Sortierfunktion 

- Eigene Formatierroutine mit extrem hoher Kapazität 

- Zweiteilung des Bildschirms in Status- und Arbeitsfeld 

- Deutscher Zeichensatz und deutsche Tastaturbelegung 

- Komplette Druckroutinen, auch für Etikettendruck 

Hardwarevoraussetzung: CPC 464/664/6128 
mit einem Diskettenlaufwerk 

Ganz gleich, was Sie zu archivieren haben. Turbo-DATA-CPC ist 
in jedem Fall die richtige Wahl. 


59.- DM* 
49,- DM* 


DM 69,- 


Copyshop 


Das universelle Hardcopy-Programm 
für CPC 464/664/6128 
Autor: Matthias Uphoff 

Njr-’™ 


ER 0 




Copyshop im Detail: 

- Hardcopy in 4 (I) Formaten: DIN A4, DIN A5, 13,5x8.5 cm und 21,5x 
13,5 cm - superschnelle Hardcopy-Routine: DIN A4 in ca. 4 Minuten (DMP 
4000) - arbeitet in allen drei Modes - Anpaßmenü für JEDEN Epson- 
kompatiblen Drucker - läuft ebenfalls mit den Seikosha-Druckern GP-500 
CPC, GP-550 CPC und GP-1000 CPC - Anpassung an Druckermöglich, 
die mit 1280 Punkten pro Zeile arbeiten, z.B, CPA-80GS - OkimateMLl82 

- Anpassung kann beim Verlag angefordert werden - Anpassung auch 
für Drucker möglich, die die Bitbild-Bytes verkehrt herum drucken (das MSB 
unten statt oben), z.B. NEC P2-Pinwriter, - 32 Farbraster über Menü wähl¬ 
bar - Grafikeditor - komfortable Pulldown-Menüs - Schnelle Fill-Routine 

- beliebige Ausschnittvergrößerungen - Bildschirm invertieren - selbst- 
relozlerende Hardcopy-Routinen für eigene Programme - neue Save- und 
Load-Routinen erkennen automatisch Mode und Farbwerte - Freezer - 
saved auf Tastendruck Screenshots aus laufenden BASIC-Programmen, 
die anschließend ausgedruckt werden können. 

Und die Weitneuheit: Hardcopy-Simulalion auf dem Bildschirm! 

Sie können sich Ihre Hardcopy vor dem endgültigen Ausdruck aut dem Bildschirm ansehen! 


3“-Diskette 


mm OFFFRs! 

für CPC 464-664-6128, nur auf 3“- Disketten 

Original CPC-Software im Paket 
zu stark herabgesetzten Preisen 

DISKSORT-STAR 

Leistungsstarke Diskettenverwaltung, die keinem CPC- 
Benutzer fehlen sollte. DISKSORT-STAR verwaltet, archiviert, 
katalogisiert, druckt,... Ihre Diskettensammlung auf einfachste 
Weise. Neben der reinen Diskettenverwaltung ist unter ande¬ 
rem noch ein kompletter Diskettenmanager enthalten. Auch in 
puncto Bedienungskomfort ist DISKSORT-STAR kaum zu 

SChla9e " STAR-MON 

Das Entwicklungssystem für Profis 

• Assembler • Editor • Disassembler 

• Monitor • vier Breakpoints • Trace- 
Funktion • Bankswitch • Memory 
Dump • Diskettenmonitor • u.v.m. 
CREATOR-STAR 


SPECIAL OFFEfi i 


Ein Trickfilmdesigner für alle Hobby¬ 
regisseure auf dem CPC! 

• Sprite-Designer • Laufschrift • Utili¬ 
ties • Kulissendesigner • Sprites mit 4 
Unterpositionen • Verbinden von Sprites 

• Kulissen auch übereinandergelegt • 

* Eigene Programmiersprache mit Editor 

und Compiler 

DESIGNER-STAR 

Grafikprogramm, mit dem man Bildschirmgrafiken komfortabel 
erstellen kann. Hilfsmenü auf Tastendruck - kein Joystick oder 
Maus notwendig. 


DM 59,- 


Unabhängig von der Anzahl der bestellten Programme berechnen wir für das Inland 4,- DM bzw. für das Ausland 6.- DM Porto und Verpackung 

Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege 












I Hardware 


Komfortabler Mitläufer 

Zweitlaufwerk mit 820 kByte Speicherkapazität 

'Opfer' des Hardware-Tests in dieser Ausgabe ist das 5,25-Zoll-Teamdrive- 
Laufwerk, welches mit einer Speicherkapazität von 820 kByte viel Platz für 
CPC-Anvvender zur Verfügung stellt. 

Wer je (vor allem unter CP/M) Anwendungen wie Text- oder Datenverar¬ 
beitung genutzt hat, der weiß um das Übel der kleinen Datenkapazität des 
eingebauten 3-ZoII-Laufwerkes. Die häufigen Diskettenwechsel können da 
recht zeitraubend sein. 


Abhilfe könnte da das Teamdrive- 
Zweitlaufwerk mit seiner hohen Spei¬ 
cherkapazität schaffen. Es wird mit 
Anleitung und einer 5,25-Zoll-Diskette 
geliefert. Das Anschlußkabel an den 
Computer ist bereits fest installiert. 
Die Floppy hat drei Schalter, wovon ei¬ 
ner der Ein/Aus-Schalter ist (vorne 
links) und die beiden anderen der Um¬ 
schalter von 180 auf 820 kByte (hinten 
rechts) und der Seitenumschalter von 
Seite A nach B (vorne rechts neben 
dem Einschaltknopf) - aber dazu spä¬ 
ter mehr. 

Zurück zum Inventar der Floppy. Da 
wäre als erstes die Anleitung: Sie ent¬ 
hält alles, was Sie zur Arbeit mit dem 
Gerät wissen müssen. Zum einen ist da 
das Arbeiten mit der Floppy im Ams- 
dos-Modus zu nennen. Hierzu wird der 
Schalter an der Rückseite vor dem Ein¬ 
schalten nach unten gedrückt. Jetzt 
können Sie mit der Floppy wie mit ei¬ 
nem normalen 3-Zoll-Gerät arbeiten, 
wobei Sie den Vorteil haben, die Dis¬ 
kette nicht wenden zu müssen, da es ja 
den Seitenumschalter an der Vorder¬ 
seite gibt. Es kann mit allen Program¬ 
men formatiert werden, mit denen man 
B-Floppys so formatieren kann, also 
z.B. : Disckit3 oder Discology. 

Was die Floppy nun zu einer sehr inter¬ 
essanten Erweiterung macht, ist das 
mögliche 820-kByte-Format. Um Dis¬ 


ketten derart formatieren zu können, 
muß der „Rückenschalter” nach oben 
gestellt sein. 

Einfache Handhabung 

Man benötigt die mitgelieferte Disket¬ 
te, denn auf ihr befinden sich die Pro¬ 
gramme zum Formatieren und zum 
Aufrufen des Formates. Das Formatie¬ 
ren ist ganz einfach: Originaldiskette 
(!) in Laufwerk B und eine mit CP/M 
2.2 (!) formatierte 3-Zoll-Diskette in 
A:. CP/M wird gestartet, und der Be¬ 
fehl 

B:FORMAT80 

lädt das eigentliche Formatierungspro¬ 
gramm. Jetzt muß man nur noch die 
Teamdrive-Maxi-Diskette (so ihr 
Name) durch eine Leerdiskette erset¬ 
zen und eine Taste drücken, und schon 
werden zweimal 80 Tracks formatiert, 
wobei die Floppy automatisch zwi¬ 
schen beiden Schreib/ Leseköpfen um¬ 
schaltet und somit eine Speicherkapazi¬ 
tät von 820 kByte pro Diskette ver¬ 
wirklicht. 

Auf der mitgelieferten Diskette befin¬ 
den sich außer dem Format-Programm 
weitere Hilfsprogramme: 

SET80.BAS 

SET80.COM 

HILFE80.COM. 


Diese drei Programme kann man mit¬ 
tels PIP kopieren; nur das Formatpro¬ 
gramm nicht, da es aus Sicherheits¬ 
gründen kopiergeschützt ist, was aber 
nicht sonderlich negativ zu bewerten 
ist, da man ja nicht unbedingt jeden 
Tag zehn 820-kBvte-Disketten benö¬ 
tigt. 

Außerdem bietet Krebs clektronic den 
Service des Eintauschen einer defek¬ 
ten Teamdrive-Maxi-Diskette gegen 
einen intakten Datenträger. 

Will man nun eine neu formatierte Dis¬ 
kette benutzen, so muß man vorher erst 
den Computer darauf hinweisen, daß 
ihm eine so große Speicherkapazität 
zur Verfügung steht. Dies geschieht 
mit Hilfe der Programme SET80.BAS 
für BASIC und SET80.COM für 
CP/M 2.2 und CP/M Plus. Das Pro¬ 
gramm HILFE80.COM stellt nur noch 
einmal eine kleine Hilfestellung dar; 
gibt aber keine neuen Informationen. 
Gerade unter CP/M ist dieser große 
Speicherplatz eine wertvolle Hilfe bei 
der Arbeit. Sie haben beispielsweise 
noch gut 250 kByte auf einer Diskette 
frei, auch wenn Sie alle unter CP/M 
mitgelieferten Dienstprogramme be¬ 
reits auf diesen Datenträger kopiert ha¬ 
ben. Das erspart das lästige Hin- und 
Herkopieren der wichtigsten Dienst¬ 
programme auf alle genutzten Disket¬ 
ten, Zeit und nicht zuletzt wertvollen 
Diskettenplatz. 

V olle Kapazi tät 
ohne Umschalten 

Zu erwähnen ist noch, daß Anwendun¬ 
gen w ie dBase II ohne Probleme auf 
dem 820-kByte-Format arbeiten. 

Ein weiterer Vorteil ist, daß die gesam¬ 
te Speicherkapazität der neuformatier¬ 
ten Diskette ohne Umschalten der ein¬ 
zelnen Seiten zur Verfügung steht. Der 
Seitenumschalter wird also nur für das 
normale 180-kByte-Dataformat ge¬ 
braucht. 

Abschließend ist zu sagen, daß es sich 
bei dieser Diskettenstation um ein 
rundherum gelungenes Produkt han¬ 
delt. Jeder CPC-Besitzer, der wenig 
glücklich über die geringe Speicherka¬ 
pazität der eingebauten 3-Zoll-Floppy 
war. findet in diesem Zusatzgerät für 
369.— DM eine sehr gute Ergänzung. 
Die Firma Krebs Electronic bietet 
außerdem noch ein Zusatzkabel an, das 
einen Anschluß der Diskettenstation 
auch an einen PC ermöglicht. 

Bezugsquelle: 

Krebs Electronic - Datentechnik 
6751 Weilerbach 
Tel.: 06374-6878 

(Markus A. Litters/jf) 
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TERMQRJUE-Disketlens tati on 


Das Teamdrive- 
Zweitlaufwerk er¬ 
leichtert durch die 
hohe Speicherkapazi¬ 
tät besonders unter 
CP/M die Arbeit 
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-SPIELE 

zu unglaublichen Preisen 


CYRUS II Schach 

Das bewährte Schachprogramm mit 3D-Display, 
einstellbarer Spielstärke und deutscher 
Bedienungsanleitung 

Für alle CPCs 

Kassette jetzt nur 10,- DM* 

Best.-Nr. 130 


STARTEST 

Action-Adventure für alle CPCs 

Kassette jetzt nur 10,- DM’ 
Diskette jetzt nur 19,- DM 

Best.-Nr. 104 


Fantastic Four 

Vier Superprogramme zum kleinen Preis: 

COCKAIGNE - Weltraum-Actionsspiel 

TERRANAUTI - Science-Fiction- 
Adventure 

FRUITS - Geschicklichkeitsspiel 
TERRANAUT II - Textad venture 


3D-Light Cycle: 

Das allseits bekannte und beliebte 
TRON-Spiel für zwei Personen jetzt 
wie im Film!! Erleben Sie dieses 
spannende und abwechslungs¬ 
reiche Actionspiel jetzt in einer 
neuen Dimension. Verblüffende und 
noch nie dagewesene 3D-Effekte 
sowie professioneller Sound lassen 
Sie in eine völlig andere CPC-Welt 
versinken. Diesen Super-Hit muß 
man ’live' gesehen haben. 

3D-Labyrinth: 

Das beste Labyrinthspiel jetzt in Super-3D-Qualität. Auf der Suche nach 
Hinweisen zum Passwort, das den mächtigen Zentralcomputer lahmlegen kann, 
lauern tausend Gefahren auf Sie. Die räumliche, perfekte 3D-Darstellung, 
superschneller Grafikaufbau und viele Überraschungen garantieren eine 
völlig neue Art von Spielvergnügen. 



Voraussetzungen: 

CPC 464/664/6128 mit Farbmonitor. Das 
Spiel 3D-Light Cycle kann ohne 3D- 
Brille auch auf Grünmonitor gespielt 
werden, Darstellung dann in 2D. 


INKLUSIVE 3D 

39, 


Best.-Nr. 1369 

Diskette jetzt nur 


-Brille 

DM* 


GAME BOX 3 


Für alle CPCs 

Diskette jetzt nur 29,- DM* 

Best.-Nr. 1011 


CPC Power-Spiele-Paket 

18 tolle Spiele für alle CPCs 

4 Disketten jetzt nur 49,- DM* 

Best.-Nr. 102 


SPECIAL OFFERSIII 

9 Spiele für alle CPCs 

3 Disketten jetzt nur 39,- DM* 

Best.-Nr. 107 


Vier Super-Programme zum kleinen Preis. 

Die neue CPC-Spielebox enthält vier ausgesuchte 
TOP-Programme der Spitzenklasse. 

Da ist für jeden das Richtige dabei! 

1. Alphajet 

Lieben Sie Abenteuer und Geiahten im Weltraum? Dann steigen Sie 
In den nouentwickelten Alphajet und erforschen die interstellaren 
Sonnensysteme. Vielfältige Gefahren lauern auf Ihrer Mission. 
Erleben Sie mit Alphajet ein hochklassiges Aciionspiel mit 
außergewöhnlicher Grafik und vielen tollen Effekten. 

2. Telefomania 

Man schreibt das Jahr 1992. Das sogenannte Datenzeitalter hat be¬ 
gonnen. Alles kann per Datenübertragung von zu Hause aus erledigt 
werden Das Problem: Einige Gebiete wurden bei der Vernetzung 
schlichtweg vergessen. Ihre Aufgabe besteht nun darin, als Einsatz¬ 
leiter vor Ort diese Vernotzung vorzunehmen. Verhandeln Sie also 
direkt mit den Hausbesitzern über Tante und Anschlußmöglichkeiten. 
Gutes Gospür Ist hier gefragt, denn nicht jeder will auch an das 
Datennetz angeschlossen werden. Mil Telefomania orwartet Sie eine 
völlig neue Spielidee, die auch Sie begeistern wird. 

3. Kampf den lnseklerf 

Übernehmen Sie die Rolle eines berühmten Gärtners. Ihre Aulgabe 
bestellt In der behutsamen Pflege des weltschönsten und mehrfach 
preisgekrönten Gartens von Lord CPC. Erschwert wird dies durch 
verschiedenartige Insekten, die immer wieder an Ihren herrlichen 
Pflanzen nagen und diese zerstören. Durch gezielten Einsatz von 
Dünger und Sprays (ohne Troibgas) können Sie den unliebsamen 
Zeitgenossen zu Leibe rücken. Ein erlebnisreiches 
Geschicklichkeitsspiel für die ganze Familie mit vielen 
Überraschungen erwartet Sie. 



4. Funbouncer 

Ihr bester Freund wurde vom bösen Zauberet entführt. Mutig und 
stark, wie Sie nun einmal sind, machen Sie sich sofort auf die Suche 
nach Ihrem verschwundenen Kumpan, Als SiQ das Schloß dos 
Zauberers erreichen, werden Sie und Ihr Freund In einen teuerroten 
Ball verwandelt. In dieser Gestalt müssen Sie nun den geheimen 
Ausgang des Gewölbes finden, um den Fluch zu verlieren. Doch 
Vorsicht: Vieltältige Gefahren, wie zum Beispiel scharte Fetskanten 
oder rostige Nägel, machen Ihnen neben anderen Zeitgenossen, die 
ebenfalls verzaubort wurden, das Leben schwer Funbouncer ist ein 
schnelles und tarbenlrohes Actionspiel mit vielen Levels und eigenem 
Bi I d-C on str uct Ion -Set. 

Für alle CPCs nur als 3-Zoll-Diskette 
Best.-Nr.: 1012 29,- 
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* Unabhängig von der Anzahl der bestellten Produkte berechnen wir für das 
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Quick Logopic 

Logo Grafiken unter CP/M 

Sechs DR.LOGO-Dateien auf einer Diskettenseite im 
Laufwerk A: oder gar 28 auf der Diskette in B: - da 
verliert man schon manchmal den Überblick. Was un¬ 
terscheidet denn nun TEST1.PIC von TEST2.PIC? Und 
wie sehen diese Grafiken denn eigentlich noch aus? 

Also DR.LOGO geladen, gewartet und 
gewartet und gewartet, bis die Schild¬ 
kröte auftaucht (feine Ironie der Pro¬ 
grammierer, dies Tier gewählt zu ha¬ 
ben), dann die Turtle versteckt, den 
Bildschirm passend aufteilt, mit > dir- 
pic< angesehen, was eigentlich auf 
der Diskette ist und mit >loadpic< 

“xxyy .pic das Bild aufgerufen und wei¬ 
ter gewartet, bis es Zeile für Zeile lie¬ 
bevoll gezeichnet worden ist. Ganz 
schön umständlich und nervig. 

Außer: Man hat ein kleines Assembler¬ 
programm wie LOGPIC.COM, das es 
viel, viel schneller macht. 

Was braucht LOGPIC.COM? 

Das Laufwerk muß man dem Pro¬ 
gramm schon sagen. A, B und M wer¬ 
den akzeptiert. Mit Eingabe von Q als 
Laufwerk verlassen Sie das Programm. 

Geben Sie bitte die Bezeichnung des 
Laufwerkes in Großbuchstaben ein. 

Der Doppelpunkt und ein bestätigendes 
> RETURN < ist nicht nötig. LOG- 
PIC braucht nur ein Zeichen und er¬ 
gänzt den Doppelpunkt selbst, um ei¬ 
nen korrekten File-Control-Block 
(FCB) zu erzeugen. 


PCW-8256-Besitzer sollten die Bytes # 02CB bis 
02CE (unter SID. COM # 03CB bis 03CE) auf “00“ ändern, 
damit das Programm nicht vergeblich Lautwerk B: sucht 



Die BDOS-Funktion, die den FCB ge¬ 
neriert, muß wissen, welches File ge¬ 
meint ist. Diese Angaben findet sie im 
Speicherbereich “FILEIN“. Er hat fol¬ 
gendes Format: 

1. Byte = Laufwerk 

2. Byte = 

3. - max. 10. Byte = Filenamen 

Byte danach = “ 

3 Bytes = Extension 

Byte danach = 00 als Endezeichen 

Sie brauchen also 15 Bytes, wenn der 
Filename acht Bytes lang ist. Die Ex¬ 
tension PIC kann man nicht an be¬ 
stimmter Stelle bereits vorgeben, weil 
CP/M ein Leerzeichen zwischen dem 
Filenamen, der zum Beispiel nur fünf 
Zeichen lang ist und der Extension als 
Ende des Filenamens interpretiert. 

Ist der Filename also kürzer als acht 
Zeichen, muß auch der String entspre¬ 
chend gekürzt werden. 

Wenn dieser String von Ihnen eingege¬ 
ben wird, können Sie natürlich auf das 
Format Einfluß nehmen. Aber wir ge¬ 
ben ja keinen Filenamen ein - LOG- 
PIC sucht sie sich aus dem Directory 
des Laufwerkes. 


Reihenfolge des ASCII-Codes weiter. 
Beim 31. File ist es bei “P“ gelandet. 
Natürlich könnte man auch einen 
schicken Balkencursor programmie¬ 
ren. Nur — wollen Sie denn wirklich 
zwischen den angezeigten Files hin- 
und her- und auf- und abfahren und die 
Wahl noch zusätzlich durch die Einga¬ 
be von zum Beispiel > RETURN < be¬ 
stätigen? Schneller und einfacher als 
der hübsche Balkencursor ist, einfach 
ein Zeichen einzugeben. 

Haben Sie das Programm gewählt, 
wird das File geladen, umgewandelt 
und am Bildschirm angezeigt. LOG- 
PIC wartet dann eine Weile, damit Sie 
Ihr Werk in Ruhe betrachten können. 
Erst nach Eingabe eines beliebigen 
Zeichens fragt das Programm nach 
weiteren Aufgaben. Also keine Sorge - 
er ist nicht abgestürzt, wenn sich 
scheinbar nichts weiter tut. 

Nun können Sie sich weitere Files an- 
zeigen lassen. Mit Eingabe eines 
>Q< wie Quit verlassen sie das Pro¬ 
gramm. 

Feilarbeit 


LOGPIC durchsucht dann das Directo¬ 
ry' dieses Laufwerkes nach Dateien mit 
der Extension “.PIC“. 

Findet LOGPIC keine, macht das Pro¬ 
gramm dezent darauf aufmerksam und 
Sie können es mit einem anderen Lauf¬ 
werk probieren. Sind PIC-Dateien vor¬ 
handen, werden sie angezeigt. LOG¬ 
PIC geht von einer Filegröße von über 
16 Kilobyte aus. Daher wird bei Lauf¬ 
werk A: und B: nur jeder zweite Direc¬ 
tory-Eintrag auf den Bildschirm ge¬ 
bracht, weil jede 16 kByte einen eige¬ 
nen Eintrag erfordern. 

Nun können sie wählen: Jedes File ist 
mit einem Kennzeichen versehen, das 
Sie eingeben. Das Programm beginnt 
mit “0“ und geht dann einfach in der 


Um das File auf der Diskette zu Finden, 
bedient sich LOGPIC wie jedes anstän¬ 
dige Standard-CP/M-Programm eines 
sogenannten File-Control-Blocks (FCB). 
Bei vielen BDOS-Funktionen wird er 
im Register DE bei diskettenorientier¬ 
ten Operationen übergeben. 

Wo liegt dieser FCB? Nun — wo Sie 
wollen. Mit der BDOS-Funktion 152 
(92H) übergeben Sie dem Programm 
eine Adresse für einen Speicherbereich 
von vier Bytes (siehe Label PFCB), in 
dessen ersten beiden Bytes die Adresse 
des eingegebenen Laufwerkes und File¬ 
namens (Label FILEIN) und in dessen 
letzten beiden Bytes die Adresse des ei¬ 
gentlichen FCB steht. Der FCB ist 36 
Bytes lang. 


Wenn Sie so gewonnene Strings bear¬ 
beiten, gibt es ein paar Regeln zu be¬ 
achten. 

Die BDOS-Funktionen 17 und 18 (11H 
und 12H) benötigen in DE die Adresse 
eines Strings in Format 

1. Byte = DRIVE 

2. - 8. Byte = FILENAMEN 
9. - II. Byte = EXTENSION 

12. Byte = EXTEND (üblich = 0) 

Also ohne und Setzen Sie ir¬ 
gendwo ein Fragezeichen, sucht das 
System alles, was in Frage kommt. 
Dieser Aufgabe dient das String 
“QUEST“: Das Laufwerk im ersten 
Byte wird von Ihnen eingegeben, der 
Filename ist durch acht Fragezeichen 
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offen gelassen und die Extension heißt 
“PIC“. 

Die gefundenen Files speichert LOG- 
PIC in einem Bereich ab Adresse 800 
in der TPA. Für jeden Namen sind 16 
Bytes reserviert, weil sich das leichter 
programmieren läßt. Parallel dazu 
werden die gefundenen Files am 
Schirm gezeigt und gezählt, damit 
LOGPIC nach Ihrer Auswahl auch das 
richtige findet. 

Das erste Byte des in diesen Speicher 
kopierten Filenamens ist offensichtlich 
die User-Bezeichnung. Daher dürfen 
wir dies Byte von den gespeicherten 
Strings ab Adresse 800 nicht mit in den 
Bereich “FILEIN“ kopieren, weil 
CP/M sonst keinen korrekten File- 
Control-Block erzeugt. In String “FILE¬ 
IN“ braucht CP/M das Format 

D: FILENAME. EXT 

Das Paßwort kann noch folgen, aber 
hierauf verzichtet LOGPIC. 

Hier brauchen wir also und im 
Gegensatz zu der Suche im Directory. 
Die BDOS-Funktion 152 erzeugt nun 
einen korrekten FCB, auf den andere 
BDOS-Funktionen wie ’File öffnen’, 
'Record lesen' und 'File schließen' be¬ 
ruhigt zurückgreifen können. 

Eine Warnung am Rande: Für solche 
Tricks wie paßwortgeschützte Files ist 
der einfache FCB von LOGPIC natür¬ 
lich nicht eingerichtet. Aber so geheim 
werden Ihre Grafiken ja nicht sein — 
oder doch? 

LOGPIC sucht dann diese Datei. 
Wehe, Sie haben inzwischen die Dis¬ 
kette gewechselt! Dann zeigt das Pro¬ 
gramm Ihnen den erhobenen Zeige¬ 
finger. 

Findet LOGPIC das gewünschte File, 
wird es Record für Record (jeweils 128 
Byte) in den DMA-Puffer von 0080h 
bis ÖOFFh eingelesen und von dort an 
die in Register DE fortgeschriebene 
Adresse übergeben. 

Die Funktion “Record lesen“ übergibt 
in Register A solange den Wert “00“. 
solange alles o.k. ist. Das Laden pas¬ 
siert dennoch recht schnell und 
DR.LOGO selbst macht es wohl kaum 
anders. 

Verwandlun g 

LOGO-Bilder sind in Grafikzeilen ge¬ 
speichert in einer Matrix von je 90 
Bytes waagerecht und 256 Bytes senk¬ 
recht; also koordinatenorientiert von 
-360 bis 359 in der Waagerechten (90 
Byte je 8 Bit = 720 Pixel) und von 256 
bis -254 in der Senkrechten, da hierbei 
nur jede zweite Adresse als “echt“ ge¬ 


wertet wird. Die immerhin 184.320 Pi¬ 
xel des Joyce-Bildschirmes werden 
also durch 23.040 Byte definiert. 

Das Video-Ram des Joyce verwaltet 
ebenso 23.040 Bytes, aber orientiert in 
32 Textzeilen zu je acht Grafikzeilen. 
Während die LOGO-Bytes in einer 
waagerechten Linie von 90 Spalten 
aufeinanderfolgen, bilden im Video- 
Ram acht aufeinanderfolgende Bytes 
ein Textzeichen. Also muß die Zei¬ 
chenfolge der Bytes umorganisiert 
werden. LOGPIC bearbeitet eine Text¬ 
zeile von 8 * 90 Bytes in einem Arbeits¬ 
gang. braucht daher einen entsprechen¬ 
den Arbeitsbereich für seine Umwand¬ 
lungsarbeit. 

Speicherplatzverwaltung 

Wo LOGPIC seine Arbeit macht, ist im 
Grunde egal. Von 0B00 (Ende von 
LOGPIC-Stringspeicher) bis F600 
(Anfang CP/M im Common) ist ja eine 
Menge Platz. Wird LOGPIC in ein an¬ 
deres Programm als Unterprogramm 
eingebunden, bietet sich eher ein wei¬ 
ter “oben“ angesiedelter Arbeitsbe¬ 
reich an. 

Auch noch aus einem zweiten Grund: 
Irgendwann muß ja der Bildschirm¬ 
speicher eingeblendet werden und dann 
stehen von 0B00 bis 3FFF und von 
C000 bis F5FF nirgends zusammen¬ 
hängende 23 kByte in der TPA zur 
Verfügung. Also kalkulieren wir 
gleich so, daß wir die Grafik in zwei 
Etappen anzeigen. LOGPIC arbeitet 
von 9300 bis F0FF. 

SHOW IT! 

Damit schnelles Scrollen der Textzei¬ 
len möglich ist, verwaltet im JOYCE 
ein Roller-Ram in der Screen-Bank bei 
B600h eine Liste, wohin eine bestimm¬ 
te Textzeile in das Video-Ram gehört. 
Hierüber ist in dieser Zeitschrift schon 
mehrfach berichtet worden, so daß an 


dieser Stelle nicht auf Details einge¬ 
gangen wird. 

Das Video-Ram beginnt bei 5930h in 
der Screen-Bank und endet bei B5FF. 
Richtig gerechnet — das sind 33 Zeilen 
zu je 8 * 90 Byte. Eine Zeile ist unsicht¬ 
bar und dient der schnellen Einblen¬ 
dung der Druckerzeile. 

Damit sicher ist, daß die Adressen 
5930h bis 5BFFh wirklich die oberste 
Textzeile bilden, setzen wir den Bild¬ 
schirm durch die XBIOS-Funktion TE- 
RESET in einen definierten Zustand 
(Label CLEAR). Geschieht das nicht, 
erscheint Ihr Bild in zwei Teile zer¬ 
rissen. 

Durch entsprechende OUT-Befehle er¬ 
zeugt LOGPIC eine zwar regulär nicht 
vorgesehene, aber dennoch wirksame 
Konfiguration von Speicherchips — 
eine spezielle “Bank“ aus 

0000 - 3FFF = Block 84 (TPA) 

4000 - 7FFF = Block 81 (Bank 0) 
8000 - BFFF = Block 82 (Screen) 
C000 - FFFF = Block 87 (Common) 

Jetzt spielt der Blockverschieber LDIR 
des Z80 seine ganze Klasse aus. Je¬ 
weils 11.520 Bytes werden bewegt, 
und zwar zuerst ab C000 die hinteren 
Bytes der umgewandelten Grafik in die 
Zeilen 16 bis 31 des Video-Ram. dann 
die vorderen Bytes der Grafik in das 
Common und von dort wieder in das 
Video-Ram, aber diesmal in Zeile 0 bis 
15. Das geht nun wirklich sehr fix. 
“Plopp!“ und das Bild ist da. 

Nun hat LOGPIC seine Arbeit getan. 
Damit zum Schluß CP/M nicht noch 
ein unschönes Prompt in die obere 
rechte Ecke setzt, geht es erst weiter, 
wenn irgendeine Taste betätigt wird 
(Input eines Zeichens ohne Echo = 
BDOS-Funktion sechs). 

Was noch so geht 

Es ist natürlich einfacher, mit 
DR.LOGO eine Grafik zu erstellen, als 
sie für ein Assemblerprogramm Byte 


[■ 

>Ö< = ENDE - LAUFWERK IN GROSSBÜCHSTABEN 
BITTE LAUFWERK A,B ODER N => A 


BODV PIC =* GIRL PIC =1 HQUSE1 PIC =2 IRON PIC =3 

MONSTER PIC =4 SCHNECKEPIC =S SKULL PIC =6 







Abb. I: So sicht die Eingabemaske von IxtgoPic aus. Durch Eingabe einer Zahl von null bis sechs 
kann nun eines der Bilder geladen und gesichtet werden 
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für Byte zu berechnen (man stelle sich 
vor: fast 185.000 Pixel!). 

Screens für ein Spiel, die schnell wech¬ 
seln sollen, “pipt“ ein Submit-Pro- 
gramm vorher in Laufwerk M: und das 
Spielprogramm holt sie von dort mit¬ 
tels eines analog LOGPIC aufgebauten 
Unterprogramms zurück. 

Die gesamte Directory-Routine von 
LOGPIC kann dabei natürlich weg¬ 
fallen. 

Auch ein Nachladen von Diskette ist 
selbstverständlich möglich: Wenn das 
Raumschiff den Sektor Südost der Ga¬ 
laxis anfliegt, muß der Pilot schon mal 


eine andere Diskette in den Naviga¬ 
tionscomputer einlegen. Oder bei ei¬ 
nem Seefahrtspiel muß der Kapitän 
dann eben eine andere Seekarte ent¬ 
rollen. 

Eine weitere Möglichkeit ist die Dar¬ 
stellung von wirtschaftlichen Entwick¬ 
lungen und Umsätzen in überzeugen¬ 
den Logo-Grafiken. 

Das Spiel als COM-File, die Grafiken 
als LOGO.PIC: eine attraktive Kombi¬ 
nation. Zumal eine Bearbeitung unter 
LOGO nach wie vor möglich bleibt. 
Ein weites Feld. 

(Horst Buchholz/rs) 


Dieses Programm ist in Assembler 
geschrieben. Nach dem Eingeben 
muß es zuerst mit dem ZMAC-As¬ 
sembler aus der Public Domain in 
ein lauffähiges COMmandopro- 
gramm gewandelt werden. Später 
kann es dann unter CP/M durch Ein¬ 
gabe von A> LOGPIC < RE¬ 
TURN > gestartet werden. Für alle, 
die sich nicht die Mühe des Abtip- 
pens machen möchten, steht auf der 
Databox-Diskette neben dem Assem¬ 
blerquelltext auch das fertig COM- 
pilierte Programm zur Verfügung. 


LOGPIC.ASM 
COPYRIGHT BY 

H. SUCHHOLZ, 3116 BIENENBUETTEL 
VOM 2.6.89 

ASSEMBLER: ZMAC (PUBL-DOM, KOTULLA) 


ZEIGT ALLE PIC-FILES OER DISKETTE, 
WANDELT MIT DR.LOGO ERSTELLTE BILDER 
IN SCREEN=FORMAT UND ZEIGT SIE AM 
SCHIRM, OHNE DASS DR.LOGO NOET1G IST 


JP START 

DB ' LOGPIC.COM BY H.BUCHHOLZ $ 


- 0) FILE-C0NTR0L-BLOCKS USW. - 


QUEST: DB 

DB 

FILEIN: DB 

DB 

FCB: DB 

DB 
DB 
DB 
DB 

PFCB: DB 

PICUS: DB 

FIVER: DB 00H 

SWITCH: DB 80H 


- 1) STRINGS - 


FILENR: DB 

' =0$' 

SPCS 

DB 

' $' 

STRL 

OS 

SAH 

STRN 

DB 

ODH.OAH.OAH,' $' 

STRX 

DB 

138,138, 138,138,138,138,3EH, ' $' 

STR1 

DB 

>Q< = ENDE - LAUFWERK IN GROSSBUCHSTABENS 

STR2 

OB 

'BITTE LAUFWERK A.B ODER M $' 

STR3 

DB 

'EINGEBEFEHLER LAUFWERKS' 

STR4 

DB 

'KEIN >.PIC<-FILE AUF X:$' 

STR5 

DB 

'BITTE KENNZEICHEN DES FILES (* = NEUES LA 
UFWERK) $' 

STR6 

DB 

'FILE WIRD EROEFFNET UND BEARBEITET - BITT 
E ETWAS GEDULDS' 

STR 7 

OB 

'DAS WAR FALSCH - NUR DIE AUFGEFUEHRTEN KE 
NNZEICHENS' 

STR8 

DB 

'BDOS-FEH LER : FILE OEFFNEN (DISKETTE GEWE 
CHSELT ?)$' 


00,3FH,3FH,3FH,3FH,3FH,3FH,3FH 
3FH,50H,49H,43H,3FH,00,00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00,00 
00 , 00 , 00,00 
30H,01,40H,01 
2EH,50H,49H,43H,00,00 


-2) UNTERPROGRAMME = CALL'S- 


NEWLIN: LD DE.STRN ; NEUE ZEILE 

BD0S9: LD C,9 ; BDOS # 9 

CALL 5 
RET 


SPACER: LD DE,SPCS 

JR BD0S9 

STRIP: LD DE.STRN 

CALL BOOS9 
LD DE,STR L 
CALL BD0S9 
LD DE.STRN 
CALL BD0S9 
RET 

SPBANK: DI 

LO A.82H 
OUT (0F2H),A 
LD A,81H 
vOUT (0F1H),A 
LD HL,OCOOOH 
LD BC.2D00H 
LDIR 

LD A.86H 
OUT (0F2H ) ,A 
LD A,85H 
OUT ( OF1H) ,A 
EI 
RET 


5 LEERSCHRITTE 


DAMIT KEINER STOERT 
SPEZIELLE "BANK" 
EINRICHTEN 


QUELLE = COOO; ZIEL = (DE) 
16 * 720 BYTES 
IN DAS VIDEO=RAM 
KORREKTE TPA 
WIEDER HERSTELLEN 


WIEDER INTERRUPT 


BEEP: LO C,2 

LD E , 7 
CALL 5 
RET 


BDOS * 2 
FUER ASCII * 7 
= BEEP 


CLEAR: CALL 0FC5AH ; X-8IOS TE-RESET 

DB OC2H.OO 
RET 


- 3) INITIALISIERUNGEN - 


START: CALL CLEAR 


LD A,'$ ; 

LO HL.OAFFH ; 

LD (HL),A j 

LD A,138 ; 

LD HL.STRL 
LO (HL),A ; 

LD DE,STRL+1 
LD BC.58H j 

LDIR ; 

INC HL 
LD A,'$' 

LD (HL),A ; 

INPDRI: LD A, 0 j 

LD HL,0800H ; 

LD DE,0801H ; 

LD BC.400H ; 

LDIR 

LD A.30H ; 

LD HL.FILENR+2 
LD (HL),A 
LD A,0 ; 

LD HL,FIVER ; 

LD (HL),A 


STRINGBEGRENZER 
WENN FEHLER BEI 
FILE OEFFNEN 
WAGERECHTE DOPPELLINIE 

IN STRING "L" GENERIEREN 

88 BYTES 
KOPIEREN 


IN 89.BYTE STRINGBEGRENZER 

SPEICHERBEREICH 
FUER DIE 
FILENAMEN LEER 
FEGEN 

FILEZAEHLER WIEOER = 0 


FILENAMEN JE ZEILE 
WIEDER VORN BEGINNENO 


Listing LOGPIC 


Listing LOGPIC 
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- 4) LAUFWERK WAEHLEN - 


CALL NEWLIN 
10 DE,STR 1 
CALL BD0S9 
CALL NEWLIN 
LD 0E.STR2 
CALL BDOS9 
LD DE,STRX 
CALL BDOS9 

LD C, 1 
CALL 5 

PUSH AF 
CALL STRIP 
POP AF 
CP * A ' 

JR 2,DRIVE 


EINE LEERZEILE 
EINGABEAUFFORDERUNG DRIVE 


INPUT EINES ZEICHENS 
BOOS # 1 


A IST O.K. 


DIESE FOLGENDEN 4 BYTES SOLLTEN 
BESITZER EINES PCW 8256 AUF "00' 
SETZEN MITTELS "SID.COM" 


CP ' B ' 

JR Z,DRIVE 


B IST O.K. 


CP 'M' 

JR Z.DRIVE 
CP 'Q' 

JP Z , ENDE 

CALL BEEP 
CALL NEWLIN 
LD DE.STR3 
CALL BD0S9 
CALL NEWLIN 
JR INPDRI 


-5) NACH PIC-DATEI EN SUCHEN- 


M IST 0.K. 

O = QUIT, ALSO ENDE 


ALLES ANDERE IST 
NICHT O.K 
FEHLERHINWEIS 


NOFILE: 


LD HL,QUEST 
LD (HL),A 
LD HL,FILEIN 
LD (HL),A 
LD HL.STR4+21 
LD (HL),A 

LD C,11H 
LD DE,QUEST 
CALL 5 
CP OFFH 
JR Z,NOFILE 
CALL PICFIL 

LD C,12H 
CALL 5 
CP OFFH 
JP Z , CHOOSE 
CALL PICFIL 
JR NXTDIR 

CALL NEWLIN 
LD 0E.STR4 
CALL BD0S9 
JP INPDRI 


DRIVE SICHERN 


DRIVE IN STRING # 4 
EINFUEGEN 

BDOS * 17 (DIRECTORY SUCHEN) 
VORGABE = *.PIC-FILES 


FEHLER ODER KEIN PIC-FILE 
DIRECTORY-EINTRAG 

NAECHSTER DIR-EINTRAG 
BDOS # 10 

NICHT O.K? ENDE ? 

DAS WAR DANN DAS LETZTE 


HINWEISTEXT 
ANDERES LAUFWERK ? 


- 6) 01R=EINTRAEGE AUFBEREITEN - 

(UNTERPROGRAMM ZU 5) 


— 6A) NUR JEDER 2. - AUSSER BEI M: 


EX 

AF,AF' 

DIR-EINTRAGS-ADR RETTEN 

LD 

HL.QUEST 



LD 

A,(HL) 



CP 

'M' 

WENN M;, DANN 

= ECHT 

JR 

Z,ECHT 



LD 

HL,SWITCH 

WENN SWITCH = 

0, KEIN 

LO 

A,(HL) 

NEUES FILE, DA 

PIC-FILE 

CP 

0 

> 16 KBY UND 2 

DIR-EINTR 

JR 

NZ.ECHT 

JE FILE 


LD 

A , 80H 

NAECHSTES GILT 

WIEDER 

LD 

(HL),A 

DAHER SWITCH = 

80 


Lisling LOGPIC 


CHOOSE: 


— 6B) ADRESSE IM DMA=PU F F ER AUFBEREITEN 


EX AF,AF' 
ADD A,A 
ADD A,A 
ADD A.A 
ADD A,A 
ADD A,A 
ADO A.80H 


AF WIEDER HOLEN 

IN A = 0, 1,2 ODER 3 


WERT IN A MAL 32 

PLUS ADRESSE DMA-PUFFER 


— 6C) SPEICHERN DIR-EINTRAG 


PUSH AF 
LD H , 0 
LD L , A 
PUSH HL 
PUSH HL 
LD DE,OSOOH 
LD HL,FILENR+2 
LD A,(HL) 

SUB 30H 
ADD A,A 
ADD A,A 
ADD A,A 
LD H, 0 
LD L , A 
ADD HL,HL 
ADD HL,DE 
EX HL,DE 

POP HL 
LD BC,10H 
LDIR 


DMA-ADRESSE IN A SICHERN 
DMA-AORESSE AUS A 
IN REGISTER HL = QUELLE 
QUELL-ADR l.MAL SICHERN 
QUELL ADR 2.MAL SICHERN 
DE = 1. SPEICHERADRESSE 
; DAS WIEVIELTE FILE ? 

AUS ASCII IN WERT 

A » 16 = OFFSET ZU 0800H 
DAS IST SCHON MAL A * 8 

IN L WERT VON 0 BIS 240 
SO. JETZT A * 16 
IN HL STEHT ZIELADRESSE 
DIE MUSS ABER IN DE SEIN 

QUELL-ADR l.MAL HOLEN 
16 BYTES = DIR-EINTRAG 
UND DEN SPEICHERN 


— 6D) FILENAMEN AM SCHIRM ZEIGEN 


POP DE 
POP AF 
ADO A,OCH 
LO H , 0 
LD L , A 
LD A, 1 $’ 

LD (HL),A 
CALL BD0S9 
LD DE.FILENR 
CALL BD0S9 
CALL SPACER 


QUELL-ADR 2.MAL HOLEN - IN DE 
DMA-ADRESSE FUER A HOLEN 
ADRESSE PLUS 12 

ADRESSE IN HL = QUELLE + 12 

STRINGENDE 

NACH QUELLE + 12 

FILENR ANFUEGEN 


-- 6E) SCRE ENZ EI LE VOLL ? -- 


LD HL.FIVER 
LD A.(HL) 

INC A 
CP 4 

JR Z.FIVEWK 
LD (HL),A 
JR KNIPSY 

CALL NEWLIN 
LD A , 0 
LO HL.FIVER 
LD (HL),A 

LD A, 0 

LD HL,SWITCH 
LD (HL),A 
LD HL,FILENR+2 
LD A,(HL) 

INC A 
LO (HL),A 
RET 


; FUENF IN EINER ZEILE ? 


WENN BEREITS 4 FILES 
IN EINER ZEILE, DANN 
NEUE ZEILE 


SWITCH WIRD 0, DAMIT 
2. DIR-EINTRAG ENTFAELLT 

FILEZAEHLER PLUS 1 


- 7) FILE AUSWAEHLEN - 


CALL STRIP 
LD DE,STR5 
CALL BD0S9 
LD DE,STRX 
CALL BD0S9 
LD C, 1 


FILE WAEHLEN 


Listlng LOGPIC 


11 ’89 PC 65 




















































_Joyce Programmsammlungen_ 

Hochwertige Software zu Niedrigpreisen finden JOYCE-Besitzer im Rahmen einer 
Programmsammlung in der Angebotspalette des DMV Verlages. 

Jede Ausgabe aus dieser Reihe enthält eines oder zwei Programme, die aus verschiedenen 
Anwendungsgebieten kommen. Diese Serie erscheint in unregelmäßiger Reihenfolge und wird als kom¬ 
plettes Programmpaket mit 3“-Diskette und Bedienungsanleitung ausgeliefert. 


Joyce Programmsammlung VOL. VI 


Die universell ersetzbare 
Tabellenkalkulation zum Erstellen 
von Monatsbilanzen, T-Konten 
etc. für die PCW(JOYCE)-Familie 


IAt tot** l-ftu 

18 W ' »;lf'» 


Leistungsumfang: 

Auf der mitgelieferten Diskette finden Sie alle zur Erstellung 

eine Startdiskette nötigen Programme und Dateien. Die Be¬ 
dienungsanleitung enthält eine ausführliche Erklärung aller 

Funktionen. 

Funktionen: 

- kurze Einarbeitungszeit, da eine einfache und übersicht¬ 
liche Menüführung Fehleingaben abfängt oder gar nicht 
erst zuläßt 

- schnelles Arbeiten durch Belegung der Funktionstasten 
mit den wichtigsten Funktionen 

- auf Wunsch wird die Formel des aktuellen Feldes am un¬ 
teren Rand eingeblendet 

- besonders schnelle Bearbeitung von Eingaben und Be¬ 
rechnungen 


- arbeitet vollständig auf dem Memory-Laufwerk, was 
Schreib-/Leseoperationen wesentlich beschleunigt 

- bis zu 68 Zeichen pro Formel möglich 

- eigene Befehle zur Verkürzung der Formeln 

- drei verschiedene Schriftarten beim Drucken 

- standardmäßig 2574 frei belegbare Felder 

- akzeptiert sogar Exponentenschreibweise 

Joyce Programmsammlung Vol. VI TABKALK für alle JOYCE 
(PCW’s) braucht den Vergleich mit vielen teureren Program¬ 
men nicht zu scheuen. 

Joyce Programmsammlung Vol. VI für alle JOYCE PCW’s 

Best.-Nr.: 22 i 3“-Diskette 59,— DM* 

unverbindliche Preisempfehlung 


V»iin Sit tufiu-ksM Itltm 1 fit« M.äto ij, bltll dit KtM-Iuti 1 1 


Das maßgeschneiderte 
DATENBANKSYSTEM für die 
PCW(JOYCE)-Familie 
(PCW 8256, PCW 8512, PCW 9512* *) 

Max. 27 Felder pro Datensatz, 50 Stellen 
pro Feld, 35.000 Sätze pro Datei, mini¬ 
maler Disketten-Speicherbedarf! 
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Die wichtigsten Leistungen von Vol. V auf einen Blick: 

- Generiert Standard-Direktzugrittsdateien (BASIC), die auch in fcigenprogram- 
me eingebunden werden können. 

- Vollautomatisch generierte Maske zur Datenerfassung, Datenänderung und 
Datenlöschung. 

- Reservierung des nötigen Speicherplatzes auf der Diskette, mit automatischer 
Erweiterung bei Erreichen der Reservierungsgrenze. 

- Gelöschte Datensätze werden vorrangig neubelegt, bevor weitere Sätze ver¬ 
braucht werden. 

- Auf Wunsch Datentransfer aus vorhandenen in neuangelegte Dateien. 

- Automatische Eintragung neuer Dateien in das Disketten-Hauptmenü 

- Alle Programme werden auf der RAM-Floppy gehalten. 

- Listenerstellung (Drucker oder Bildschirm) mit automatischer Spal¬ 
tenformatierung. 

- Daten können selektiert (ausgewählt, ausgeschlossen) werden. 

- Auf Wunsch Summen numerischer Spalten. 

- Freie Wahl der Sortierung; Mehrfachsortierkriterien. 


- Ohne Lernaufwand SOFORT voll anwendbar, keine Befehlswörter. 

- Nach 1-2 Minuten können Sie bereits über eine komfortable Maske Daten er¬ 
fassen. 

- Druckmasken für die beliebig sortierte Datenauflistung am Bildschirm oder am 
Drucker brauchen Sie nicht erst mühselig zu programmieren, sie werden vol¬ 
lautomatisch für beliebige Datenfelder und Spaltenfolgen generiert. 

- Bei mehrseitigen Auflistungen am Bildschirm Direktsprung zu jeder beliebigen 
Seite, 

- Einmal gewählte Druckparameter werden auf Wunsch gespeichert, die ent¬ 
sprechenden Listen können jederzeit abgerufen werden. 

Sofort Ergebnisse statt (frustrierender) Erlebnisse! 

VOL. V für Joyce/PCW 8256/8512/9512** mit ausführlicher 

Bedienungsanleitung 

Best.-Nr.: 220 3“-Diskette 99,- DM 

unverbindliche Preisempfehlung 

** PCW 9512 auf Anfrage 


Unabhängig von der Anzahl der bestellten Programme berechnen wir für das Inland 4, - DM bzw. für das Ausland 6, - DM Porto und Verpackung. 

Bitte benutzen Sie die Bestellkarte. 

—DMV-Verlacj - Postfach 250 - 3440Eschwege— 




















BildEditor 

Funktion: Grafikprogramm zum Erstellen von hochauflösenden Grafiken, 
welche in eigene Programme eingebunden werden können sowie deren 
Ausgabe auf dem JOYCE-Drucker. 

Leistungsumfang: Der mitgelieferten Diskette können sie alle zum Arbei¬ 
ten mit dem Programm benötigten Dateien entnehmen. Für alle Turbo- 
Pascal-Programmierer wird auch der Programmtext mitgeliefert. 

Funktionen: Durch das Unterscheiden zwischen Grob- und Feinbearbei¬ 
tung ist es möglich, brilliante Grafiken auf das Pixel genau zu zeichnen. 
Lösch- sowie Invertierfunktion sind in allen Bearbeitungsmodi aufrufbar. 
Auch Texte können bei der Grobbearbeitung in das Bild gebracht werden. 

Im Dateimenü steht neben einer Lade- und Speicheroption noch eine Funk¬ 
tion zur Verfügung, welche zwei Bilder miteinander mischt. Neben dem Ver¬ 
satz des linken Randes vor dem Drucken können noch vier verschiedene 
Druckformate angewählt werden 

VOL. IV für Joyce/PCW 8256/8512 mit 
ausführlicher Bedienungsanleitung 


Best.-Nr.:219 


3“-Diskette 


49,- DM* 

unverbindliche Preisemptehlung 


1. Feld-Tab 

, F Ein BASIC-Programm zum millimetergenauen Ausfüllen von Tabellen, Vor¬ 
drucken und Formularen, Feld-Tab ist menügesteuert und bietet die Anwahl 
der einzelnen Funktionen, wie unter LocoScript gewohnt. Geben Sie Sei¬ 
tenlange, Zeilenabstand und Tabulatoren in Millimetern ein, bestimmen Sie 
Schriftweite, Schriftart und Text. Text kann mit LocoScript erstellt werden 
und nach Umwandlung in eine ASCII-Datei in Feld-Tab eingelesen werden, 
Weitere ASCII-Editoren können ebenso verwendet werden wie der komfor¬ 
table programminterne Seiteneditor. Ein unentbehrliches Werkzeug! 

2. Gsxplot 

Ein Grafikpaket für Statistiken, Geschäftspräsentationen und viele andere 
grafische Anwendungen! Überein Menü sind folgende Funktionen wählbar 
Balkendiagramme ■ Kurvendiagramme 1 Strichgrafik 
■ Punktediagramme • Textgrafik 

Ein Hilfsprogramm erläutert Ihnen während der Arbeit mit Gsxplot die wich¬ 
tigsten Funktionen Alle erstellten Grafiken können sowohl am Bildschirm 
als auch auf dem Drucker dargestellt werden. Gsxplot braucht den Ver¬ 
gleich mit wesentlich teurerer Software nicht zu scheuen! 

VOL.III für Joyce/PCW 8256/8512 zwei Disketten 
mit ausführlicher Bedienungsanleitung 


Best.-Nr.: 217 


3“-Diskette 


59,- DM’ 

unverbindliche Preisempfehlung 


SUPERdat 

Eine universelle Dateiverwaltung für PCW 8256/8512 zur Erstellung eigener Dateien. 
Leistungsumfang: MASKE ist das Vorprogramm, mit dem Sie die Feld¬ 
namen und -längen sowie die Länge des Suchbegriffs voreinstellen 
können. 

SUPERdat ist das Hauptprogramm, welches die Daten der gewünschten 
Datei verwaltet. Neben der Eingabe von Daten in die Maske sind mehrere 
Sucharten, so z.B. auch Jokersuchen möglich Jede Datei kann max. acht 
Felder enthalten, wovon jedes max. 40 Zeichen enthalten darf Die Gesamt¬ 
länge eines Datensatzes darf 255 Zeichen betragen. 

SUPERtex Dieses Programm stellt eine Rundschreib- (Mailmerge-)funktion 
für SUPERdat zur Verfügung. In einen in Laufwerk M: befindlichen ASCII- 
Text (z.B. mit RPED erstellt) werden automatisch vom Anwender vorausge¬ 
wählte beliebige Einträge aus beliebigen SUPERdat-Dateien an beliebiger 
Stelle eingefügt. Weiterhin können 30 beliebige Datensätze in eine für Lo¬ 
coScript lesbare Datei umgewandelt werden, 

SUPERcal Der Taschenrechner zu SUPERdat. Dieser bietet neben den 
Grundrechenarten auch Winkelfunktionen, quadratische und Prozentfunk¬ 
tionen, Eine Klammerebene und Memory-Funktionen vervollständigen das 
Leistungsangebot dieses Programms. 

VOL.II für Joyce/PCW 8256/8512 mit 
ausführlicher Bedienungsanleitung 


Best.-Nr.: 216 


3“-Diskette 


49, - DM* 

unverbindliche Preisempfehlung 


1. Der Character-Designer 

Funktion: Komfortable Erstellung eigener Zeichensätze auf PCW 8256/ 
8512 und deren Darstellung am Bildschirm! Ausdruck von ASCII-Files in 
diesem Zeichensatz unter CP/M Plus. 

Leistungsumfang: CD.COM ist der Character-Designer, der Editie- 
rung oder Neuerstellung von Zeichensätzen und deren Speicherung er¬ 
laubt. CD-PRINT druckt vorformatierte ASCII-Texte auf dem Joyce-Drucker 
oder anderen Druckern in dem gewünschten Zeichensatz aus. 

CRAZY, ORIGINAL. LOCCHAR und SCRIPT sind mitgelieferte Zeichensät¬ 
ze. SETUP.COM erlaubt als Zugabe die Vorwahl einiger Systemparameter, 
z.B. die der seriellen Schnittstelle, der Tastaturgeschwindigkeit und der 
Floppy-Steprate. 

2. MGX 

Funktion: Grafische Darstellung von mathematischen Funktionen und be¬ 
liebigen Meßreihen auf Bildschirm oder im Großformat auf dem Drucker. 
Leistungsumfang: Neben den arithmetischen Grundfunktionen sind auch 
weitere Funktionen darstellbar, die z.B, unter Mallard-Basic nicht zur Verfü¬ 
gung gestellt werden. Es können mehrere Funktionen und Meßreihen (die¬ 
se wiederum mit mehreren Meßwerten gleichzeitig) dargestellt werden. 

VOL.I für Joyce/PCW 8256/8512 mit 
ausführlicher Bedienungsanleitung 

Best.-Nr.: 215 3“-Diskette 49,- DM* 

unveibinöliche Preisempfehlung 


D M V - Angebot 

Praktische Textverarbeitung mit Joyce 
Ein Buch/Disketten-Paket. Der Autor Jürgen Sie- 
bert zeigt in diesem Buch Möglichkeiten der Text¬ 
verarbeitung auf, die Sie von LocoScript nicht er¬ 
wartet hätten,.. Von der Pike auf werden Sie an 
den Umgang mit Schablonen und Standardlayout 
herangeführt. Einige Abstecher führen Sie an¬ 
hand anschaulicher Beispiele an Textverarbeitung 
und CP/M (ED/Wordstar) heran. 

Aus dem Inhalt: 

- LocoScript Spezial • Softwaretraining für Fort¬ 
geschrittene 

- Fehler im System: Wie rette ich meinen Text? 

- Joyce-Tasteninstallationsdatei für das Pro¬ 
gramm Wordstar 

- Aleatorische Poetik: Der Computer dichtet 

Auf Diskette: Über 50 Dateien mit Schablonen, Brieten, Postkarten, Serien- 
Rundschreiben, Formularen, Etiketten. Druckbeispielen. Schriften. 
Bildschirm-Installationen uvm. 

Leinen-Hardcover, 207 Seiten, 

3 !, -Diskette Best.-Nr. 401 DM 89, — * 


äpg dSB B SB 


Joyce 

Bücher-Kiste 


Aus dem Data-Becker-Angebot 

Das Große LOGO-Buch zu CPC und Joyce 

LOGO kann mehr, als Sie denken. LOGO ist heute eine 
anerkannte Sprache bei vielen ehrgeizigen Programm Projek¬ 
ten. Das reicht bis hin zur Erstellung von Kl-Programmen. 
Hier das Buch für CPC- und Joyce-Besitzer, die viele Vorteile 
dieser Sprache kennenlernen wollen. Um nur einige Stich¬ 
worte zu nennen: Listenverarbeitung, Prozeduren, Rekur¬ 
sionen, Sortierroutinen, Maskengenerator. Nutzen Sie diese 
Sprache für Ihre eigenen, ehrgeizigen Programmideen. 


410 Seiten Best.-Nr. 417 


DM 39,- 


Programmierwissen pur im Westentaschenformat 


Führer zum Joyce 


Best.-Nr, 450 

DM 

Führer zum CP/M 


Best.-Nr. 452 

DM 


Aus dem Franzis-Verlag-Angebot 


Der Autor hat es sich zur Aufgabe gemacht, den Joyce als 
vollständigen Computer zu beschreiben. Er vermittelt dem 
Joyce-Besitzer eine Menge interessanter und nicht alltäg¬ 
licher Kenntnisse. Außerdem ist das Buch angefüllt mit Pro- 
grammlistings, die für den fertigen Einsatz konzipiert sind. 
Aus diesen Listings lassen sich zahlreiche ausgefeilte Pro¬ 
grammtricks entnehmen. Der Aufbau und die Bedienung des 
CP/M-Betriebssystems werden ebenfalls für den Joyce- 
Anwender, der sich nicht mit einfacher Textverarbeitung 
begnügen will, behandelt. Insgesamt stellt das Buch eine 
interessante Programmierliteratur für den technisch interes¬ 
sierten Joyce-Eigner dar. 


ca. 160 Seiten Best.-Nr. 425 


DM 38,-* 


Unabhängig von der Anzahl der bestellten Bücher berechnen w|r für das Inland 4.- DM 
bzw. für das Ausland 6,- DM Porto und Verpackung. Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege 























[-JOYCE 


CALL 5 
CP ’ * ‘ 

JP Z.INPDRI 

LD HL.FILENR+2 
LD C,(HL) 

CP C 

JP P.FMIST 
CP 30H 
JP M,FMIST 

SU8 30H 
ADD A,A 
ADD A,A 
ADO A,A 
LD h , 0 
LD L, A 
ADO HL,HL 
INC HL 

LD DE.OflOOH 
ADD HL.DE 
LD DE ,FILEIN + 2 
LD BC,8 
LDIR 

JR CREATE 

CALL NEWLIN 
LD DE,STR7 
CALL BOOS9 
CALL BEEP 
CALL NEWLIN 
JR CHOOSE 


INPUT MIT BDOS # I 
WENN EINGABE = * 
DANN NEUES LAUFWERK 


AUSGEWAEHLTE FILENR IN A 
DARF NICHT GROESSER SEIN 
ALS DIE GESPEICHERTE IN C 
KLEINER NATUERLICH 
AUCH NICHT 

AUS ASCII WIRD WERT 
MAXIMAL 2 « 30 = 60 
MAXIMAL 4 * 30 = 120 
MAXIMAL 8 * 30 = 240 


JETZT = A * 16 = MAX. 480 
PLUS 1, UM 1. BYTE DIR=ENTRAG 
ABZUSCHNEIDEN *l• 

ANFANG SPEICHERBEREICH 
HL = QUELLE = DIR-EINTRAG 
; ZIEL-ADRESSE 
8 BYTE KOPIEREN 


FEHLERHINWEIS 

FILE NICHT ANGEZEIGT 


- 8) FILE-CONTROL-BLOCK ERZEUGEN - 


CREATE: 


LD A, 1 : ' 

LD HL.FILEIN+l 
LD (HL),A ; 
LD B,8 ; 
INC HL 

LD A,(HL) ; 
CP 2OH ; 
JR Z,SHORTY ; 
DJNZ LOOP 1 ; 


EX HL,DE 
LD HL,PICUS 
LD BC,6 
LDIR 

LD C,9 8H 
LD DE.PFCB 
CALL 5 


AUFBEREITEN FILENAMEN 

DER NACH DEM LAUFWERK 

8 ZEICHEN DES FILENAMENS 

ZEICHEN PRUEFEN 
IST ES EIN LEERZEICHEN ? 
DANN FILENAMEN VERKUERZEN 
SONST NAECHSTES DER 8 BYTE 

DE = ZIELADRESSE BEI FILEIN 
EXTENSION ".PIC" UND 
ZWEI OO-BYTES ANFUEGEN 


BDOS tt 152 

CREATE FILE-CONTROL-BLOCK 
< = FCB) 


- 9) FILE OEFFNEN - 


CALL NEWLIN 
LD DE.STR6 
CALL BD0S9 
LD C.OFH 
LD OE,FCB 
CALL 5 
CP 0 

JR Z.FILEOK 

CALL NEWLIN 
LD DE.STR8 
CALL BDOS9 
CALL BEEP 
CALL NEWLIN 
LD DE,STRX 
CALL BD0S9 
LD DE,FILEIN 
CALL BD0S9 
JP ENDE 


HINWEISTE.XT 


BDOS * 15 
FILE OEFFNEN 


ETWA FILE NICHT GEFUNDEN? 
WENN A = 0, DANN O.K. 


FEHLERHINWEIS 


WELCHES FILE GEMEINT ? 


- A) FILE EINLESEN UND SCHLIESSEN - 

FILEOK: LD DE.9600H ; ANFANGSADRESSE FUER PIC=FILE 


Listing LOGPIC 


L00P2 


LOOP3: 


PUSH DE 
LD C,14H 

LD DE,FCB 
CALL 5 
LD HL,80H 
LD BC.BOH 
POP DE 
LDIR 

CP 0 

JR Z,READR 

LD C,10H 
LD DE,FCB 
CALL 5 


ZIEL-ADRESSE SICHERN 
LIEST EINEN RECORD VON DISKET 
TE 

MITTELS BDOS » 14H 

IN ADR 80 = " DMA = PUFF ER" 

HOLT DARAUS 80H (1260) BYTES 
UND BRINGT SIE NACH (DE) 


DER LETZTE RECORD OES FILE ??? 
WENN NEIN, DER NAECHSTE 

FILE SCHLIESSEN 
MITTELS BOOS * 10H 


; - B) DR.LOGO=BYTES IN SCREEN-BYTES WANDEL 

N- 


LD DE.9680H 


LD HL,9300H 
LD B,1 FH 


PUSH BC 
LD B, 8 


PUSH BC 
LD B,5AH 
PUSH HL 

LO A,(DE) 
LD (HL),A 
PUSH DE 
LD DE,8 
ADD HL.DE 
POP DE 
INC DE 
DJNZ LOOP 4 

POP HL 
INC HL 

POP BC 
DJNZ L00P3 

POP BC 
PUSH OE 

LD DE,712 

ADD HL.DE 

POP DE 
DJNZ LOOP2 


QUELLE - DIE ERSTEN 7F BYTES 
IRRELEVANT 

ZIEL DER UMGEWANDELTEN BYTES 
ANZAHL OER "TEXT"-ZEI LEN = 0 
- 31 

TEXTZEILEN=ZAEHLER RETTEN 
8 "GRAFIK"-ZEILEN JE "TEXT"-Z 
EILE 

GRAPHIKZEILEN=ZAEHLER RETTEN 
90 BYTES JE GRAPHIKZEILE 
ZIEL-ADRESSE RETTEN 

DR.LOGO=BYTE HOLEN 
UND NEU SORTIEREN 

Quell=adresse retten 

ZIEL-ADRESSE PLUS ACHT 
QUELL-ADRESSE HOLEN 
UND DIE NAECHSTE 
BIS 90 DURCH SIND 

ALTE HL-ADRESSE HOLEN 

AUF NAECHSTE GRAPHIKZEILE IN 

TEXTZEILE 

GRAPHIKZEILEN=ZAEHLER HOLEN 
BIS 8 GRAPHIKZEILEN DURCH 

TEXTZEILEN=ZAEHLER HOLEN 

MAL WIEOER QUELL-ADRESSE RETT 

EN 

HL JETZT 712 BYTES WEITER = 0 
. SPALTE 

OER NEUEN TEXTZEILE ZU JE 720 
BYTE 

UND (DE) IST WIEDER DA 

BIS ALLE TEXTZEILEN BEARBEITE 

T SIND 


- C) SHOW IT ! - 


CALL CLEAR 

LD DE,8630H 
CALL SPBANK 
LD HL.9300H 
LD DE,OCOOOH 
LD BC.2D00H 
LDIR 

LD DE,5930H 
CALL SPBANK 

LD C. 6 
LD E.OFDH 
CALL 5 
JP START 


VIDEO=RAM IN DEFINIERTEN ZUST 
AND 

UNTERE 16 ZEILEN VIDEO=RAM 
BYTES IN DAS COMMON KOPIEREN 


OBERE 16 ZEILEN VIDEO=RAM 


AUF ZEICHEN WARTEN, DAMIT 
NICHT DAS CP/M-PROMT STOERT 

GGFS. NEUE GRAPHIK 


- D) PROGRAMMENDE - 


CALL NEWLIN 
CALL 0 


UFF - GESCHAFFT 


Listing LOGPIC 


68 PC 11 ’89 







































»JOYCE-Bestellservice« 
Knüller für JOYCE-Fans 

Ich mache von Ihrem Angebot Gebrauch und bestelle hiermit: 


30170 Stck. Joyce-Sonderheft-Superpack 

3 x Joyce-Sonderhefte der Ausgaben 2/87-4/88 29,- DM 


30171 Stck. Joyce-Sonderheft-Superpack-Databox 

5x3 1/2“-Disketten zu den Ausgaben 2/87-4/88 79, - DM 


215 Stck. JOYCE Programmsammlung Vol. 1 49,-DM 

216 Stck. JOYCE Programmsammlung Vol. 2 49,- DM 

217 Stck. JOYCE Programmsammlung Vol. 3 59,- DM 

219 Stck. JOYCE Programmsammlung Vol. 4 49,- DM 

220 Stck. JOYCE Programmsammlung Vol. 5 99,- DM 

221 Stck. JOYCE Programmsammlung Vol. 6 59,- DM 


+ Porto/Verpackung 

(Inland 4,- DM, Ausland 6,- DM) 

Gesamtbetrag 


□ Den Betrag bezahle ich mittels des beigefügten Verrechnungs¬ 
schecks. 

□ Ich bitte um Lieferung per Nachnahme zuzüglich der Nachnahme¬ 
gebühr. (Bei Lieferung ins Ausland ist Nachnahme nicht möglich.) 



Datum 


Unterschrift (bei Minderjährigen des gesetzlichen Vertreters) 
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JOYCE/PCW 

DATABOX 


PC 1512/1640 

DATABOX 



DATABOX ist der preiswerte Software-Service Ihrer Zeitschrift 
DATABOX enthält lauffähige Programme für Ihren Einsatz 
DATABOX lohnt sich auf jeden Fall - Monat für Monat 


JOYCE PCW 8256/8512/9512 


Quick Logopic 

Laden Sie Ihre LOGO-Grafiken direkt unter CP/M Plus ein, ohne erst die 
endlose Ladeprozedur von LOGO hinter sich bringen zu müssen. 

Ordnung muß sein 

Gerade bei Aktenordnern, wo sich die Beschrifung des Rückens immer 
wieder ändert. Eine übersichtliche und sauber ausgedrucke Rückenbe¬ 
schriftung macht sicherlich auch viel her. 

Die Joyce-PC-Kopplung 

Nachdem Sie im Heft den Artikel gelesen haben, können Sie nun zur Tat 
schreiten. Die DATABOX enthält das Programm Kermit sowie die zwei 
Submit-Dateien. 


Bonus 

Das Programm Ölmanager, welches in der Ausgabe 7/89 für den CPC 
erschienen ist, liegt nun in einer Version für den Joyce PCW vor, die wir 
Ihnen nicht vorenthalten möchten. 

Als weiterer Bonus wird von uns ein kleines Programm zum Ausdrucken 
und Anschauen von ASCII-Textfiles wie zum Beispiel der Liesmich-Datei 
gestellt. 


PC 1512/1640 


Unterlagendatei 

‘Wider der tierischen Unordnung in der privaten Bürokratieansamm¬ 
lung“. Unter diesem Motto steht das Programm Unterlagendatei, was 
sich zur Aufgabe gesetzt hat, Ordnung in private Bilanzen und 
Bescheide zu bringen. 

Verflixt (und zugenäht) 

Ein Denkspiel, das nicht umsonst diesen Namen trägt, wird der Spieler 
doch aufgrund des hohen Schwierigkeitsgrades dieser komplexen 
Verschiebefix-Variante mit Sicherheit den ein oder anderen Fluch von 
sich geben. 


Eine Maus macht Ärger 

Eine gehörige Beschleunigung in der Bildschirmausgabe bringt Ihnen 
unser “gepatchter“ Maustreiber für alle 1512er und 1640er. 
Bonusprogramm 

Renaissance im Bereich des Computerspiels: Schwelgen wir in Erinne¬ 
rungen, und begeben wir uns "back to the roots“ mit einer tollen 
Pacman-Variante. 


Als Diskette für 1 Jahr (12 Lieferungen) 

Im Inland und West-Berlin. 300 , - DM 

Im europäischen Ausland. 320,- DM 

Im außereuropäischen Ausland. 360.- DM 

Bitte benutzen Sie für Ihre Bestellung die Abo-Karte. 


Zahlungshinweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) oder als Nachnahme zuzüglich der Nach¬ 
nahmegebühr. (Bei Lieferungen ins Ausland ist Nachnahme nicht möglich.) 

Widerrufsrecht: 

Jeder Abonnent hat das Recht, seine Bestellung innerhalb einer Woche beim DMV-Verlag, 
Postfach 250. 3440 Eschwege, schriftlich zu widerrufen. Die rechtzeitige Absendung des Widerruf¬ 
schreibens genügt zur Fristwahrung, 

Bitte benutzen Sie die Bestellkarte 7 , 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege /DAIIT 

/ / /Daten- and 

Medienverlag 


Einzelbezugspreis für DATABOX: 

PCW - 3-Zoll-Disk. PC - 5 1 /4-Zoll-Disk. 


24, - DM (Unverbindliche Preisempfehlung) 

Wenn Sie über den DMV-Verlag bestellen, gilt folgendes: 

Inland: Ausland: 

Einzelpreis 24,- DM Einzelpreis 24,- DM 

zzgl. Versandkosten 4,-DM zzgl. Versandkosten 6,-DM 

Endpreis 28,- DM Endpreis 30,- DM 


Das DATABOX-Abo kostet: 

Als Diskette für 1/2 Jahr (6 Lieferungen) 

Im Inland und West-Berlin. 150,- DM 

Im europäischen Ausland. 160, - DM 

Im außereuropäischen Ausland. 180,- DM 
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Ordnung muß sein 

Akten beschriften mit Pfiff 

Sie sind doch sicher auch im Besitz einiger Akten? Haben Sie diese bisher 
auch von Hand beschriftet und sie dann lieber in einen geschlossenen 
Schrank gestellt, weil Sie sich über das Aussehen der Schrift ärgern? Oder 
ändert sich der Inhalt Ihrer Akten öfter, so daß Sie immer wieder neue Eti¬ 
ketten kaufen müssen? Dann ist dieses kleine Programm genau das richtige 
für Sie. 


Dieses Programm stellt eine Kombina¬ 
tion aus Text und Bitbild-Grafik auf 
dem Drucker dar. Dabei wird die Län¬ 
ge und Breite des Ausdrucks in ein 
Vielfaches der Größe eines Schriftzei¬ 
chens in Eliteschrift (10 Pixel bei dop¬ 
pelter Dichte) umgerechnet. Dies ver¬ 
einfacht die Berechnung. Wollen Sie 
näheres über die Bitbild-Grafik wissen, 
so lesen Sie im Benutzerhandbuch 1, 
Anhang 2, Seite 18 beziehungsweise 
im JOYCE-Sonderheft 3, Seite 63 
nach. Das große (!) “Ö“ in Zeile 720 ist 
kein Schreibfehler, sondern die Dar¬ 
stellung des Zeichens für Ganzzahldi¬ 
vision im deutschen Zeichensatz. 

Zum Programm: 

Nach dem Start werden Sie zuerst nach 
Höhe und Breite des zu erstellenden 
Ausdrucks in Millimetern gefragt. 
Hierzu gleich eine Anmerkung: Die 
Abmessungen des Ausdrucks können 
aus oben genannten Gründen bis zu 1,4 
mm von den vorgegebenen Werten ab¬ 
weichen. Hier die Werte von Leitzord¬ 
nern, wo die Rückenbeschriftung ein¬ 
geschoben und nicht geklebt wird. 


Breiter Ordner: Höhe ca. 190 mm, 
Breite ca. 57 mm. 

Schmaler Ordner: Höhe ca. 190 mm, 
Breite ca. 32 mm. 

Die Werte für andere Ordner müssen 
Sie selber ermitteln. Die Maximalwer¬ 
te sind für die Breite 15 bis 93 mm und 
für die Höhe 68 bis 200 mm. Damit 
dürften sämtliche gängigen Ordner ab¬ 
gedeckt sein. Nun kommen wir zur 
Texteingabe. Sie können je nach Höhe 
bis zu 20 Zeilen Text auf dem Aus¬ 
druck unterbringen, wobei jeweils 
nach fünf Zeilen auf dem Bildschirm 
und auf dem Drucker ein waagerechter 
Strich zur Unterteilung gezogen wird. 
Dabei werden bei der Eingabe nur so- 
viele Zeilen abgefragt, wie hinterher 
auch gedruckt werden, und auch in der 
Breite werden nur soviele Zeichen ak¬ 
zeptiert, wie auf den Ausdruck passen. 
Dabei haben Sie in jeder Zeile die 
Möglichkeit, zwischen Breit- und Nor- 
malschrift zu wählen. Wenn Sie bei der 
Texteingabe einen Fehler in einer der 
darüberliegenden Zeilen entdecken, 
können Sie, wenn Sie nach der Schrift¬ 
art gefragt werden, mit der Cursor¬ 


hoch-Taste zurückgehen und diesen 
korrigieren. Wollen Sie in einer Zeile 
keinen Text schreiben, so drücken Sie 
bei der Frage nach der Schriftart nur 
die Taste ENTER. Nach Beendigung 
der Texteingabe werden Sie noch ein¬ 
mal gefragt, ob alles richtig ist und 
wenn Sie jetzt die Taste “J“ drücken, 
wird gedruckt. Jede andere Taste be¬ 
wirkt einen Sprung in die letzte Zeile 
der Texteingabe. Sie brauchen sich 
übrigens nicht die Mühe zu machen, 
bei der Eingabe den Text schon zu zen¬ 
trieren. denn das macht das Programm 
beim Ausdruck automatisch. 

Wenn der Ausdruck vorliegt, brauchen 
Sie nur eine Schere, um überflüssiges 
Papier wegzuschneiden. Dabei schnei¬ 
den Sic zwischen den beiden Linien, 
die den Ausdruck umranden. Es ist 
vielleicht auch sinnvoll, vorher das Pa¬ 
pier am rechten Rand des Feldes zu fal¬ 
ten, um eine doppelte Lage zu erhalten, 
da das Druckerpapier sehr dünn ist und 
eventuell vorhandene, nicht zu entfer¬ 
nende alte Beschriftungen durchschim¬ 
mern könnten. 

Zum Schluß noch eine Anmerkung: 
Den Titel in Zeile 140 können Sie nach 
Belieben ändern, er sollte nur nicht zu 
lang sein, denn wenn er länger als die 
vorgegebene Breite ist, wird er vom 
Programm nicht gedruckt. 

(Joachim Behnke/rs) 


Dieses Programm ist in Mallard-Basic geschrieben. 
Nach der Eingabe sollte es zuerst mit 
SAVE“AKTE.BAS“ <RETURN> abgespeichen wer¬ 
den. Spüler kamt es dann unter BASIC mit 
RUN“AKTE. BAS" < RETURN> und unter CP/M mit 
A > BASIC AKTE. BAS < RETURN> wieder aufgeru¬ 
fen werden. 


LISTING > AKT E <, REMARK = >'<. 

< 1 > 10 ' ******************************************** 

< 2> 20 ' **. Aktenrücken beschriften. ** 

< 3> 30 ‘ **. wrltten by Joachim Behnke. ** 

< 4> 40 ' ******************************************** 


< 2 7 > 50 esc$=CHR$(27):cls$=esc$+"E" + esc$+"H" 

< 5 7 > 60 cps$=esc$+"j":zsp$=esc$+"k" 

< 68 > 70 1on$ = esc$+"p":ioff$=esc$+"q" 

< 92 > 80 cl$ = esc$+"D":zehl$=esc$+"J " 

< 26 > 90 z1$ = esc$+ " J ":be11$=CHR$< 7 ) 

< 1 5 > 100 cps$=esc$+"j “: zsp$=esc$+"k" 

< 6 7 > 110 DEF FNatS(Z.s)=esc$+"Y"+CHR${31 + Z)+CHR$(31 + s) 

<22> 120 breit$ = CHR$(14) :norma1$=CHR$<20) 

< 69 > 130 DIM text$(20),art$(20),faktor(20) 

< 36> 140 WIOTH 255,255:titel$="LEITZ" 

< 28 > 150 ' - 

< 30 > 160 ' **************. Texteingabe. ************** 

< 32 > 170 ' - 

< 72> 180 art$=norma1$:j=4:i=1:PRINT esc$ + "0";cl3$; 

< 16> 190 PRINT ion$;STRING$(23. 154) ;Aktenrücken besch 

riften. by Joachim Behnke ";STRING$(23,154);1off$ 

< 7> 200 PRINT FNat$(3,1);1on$;" Breite des Feldes in m 

m (15-93) Ioff$; :INPUT" ",b 

< 8 > 210 IF b <15 OR b > 93 THEN PRINT be11$;:GOTO 200 

<80> 220 PRINT FNat$(3.40);ion$;“ Höhe des Feldes in mm 
(68-200) ";ioff$;:INPUT" ",h 

Listlng AKTE_ 


< 9 2 > 230 IF h< 68 OR h>200 THEN PRINT bell$;:GOTO 220 

< 68 > 240 z = CINT(b/(25.4/12))-l:s=CINT(h/(25.4/9)) 

< 38 > 250 PRINT zl$; 

< 81> 260 PRINT FNat$(j + 1,1);1on$USING" Zeile «Mt. Schrif 

tart ( n/b) ";i; 

< 9 7 > 270 a$=INKEY$:IF a$="" THEN 270 

< 65 > 280 IF a$=CHR$(13) THEN text$(i) = "“:PR INT 1off$:G0 

TO 340 

<15 > 290 IF a$ = CHR$(31) AND 1>1 AND (i-1 )/5 = 1NT((i-1)/5 
) THEN PRINT FNat$(j + 1.1);zl$;FNat$(j + 1-1.1);zl$;F 
Nat$(j+i-2,1);z1$;:j=j-l:1=1-1:GOTO 260 

< 95 > 300 IF a$=CHR$(31) AND 1>1 THEN PRINT FNat$(j+1,l) 

;zl$;FNat$(j+1-1,l);zl$i:1=1-1:GOTO 260 

< 65 > 310 IF a$="n" THEN art$(1)=norma1 $:faktor(i) = 1 ELS 

E IF a$=“b" THEN art$(1)=bre1t$:faktor(1)=2 ELSE G 
OTO 270 

< 78 > 320 PRINT a$; " , PRINT"Text: ";1off$;".. ";cps$; 

STRING$(INT(z/faktor(i)),".");zsp$;:INPUT"",text$( 
1 ) 

< 45 > 330 IF LEN(text$(i))>z/faktor(1) THEN PRINT FNat$( 

j + i,1);zl$;bei 1$;:GOTO 260 

< 25 > 340 IF ((j + i >*2) + 12>s THEN GOTO 370 

< 67 > 350 IF i/5 = INT(i/5) ANO 1020 THEN j=j + l:PRINT FNa 

t$(j+i,1);STRINGS(90,154) 

< 8 6 > 360 IF 1< 20 THEN 1 = i + l:G0T0 260 

< 81> 370 PRINTrPRINT bei 1 $;"A11 es richtig (J/N) ? "; 

< 60> 380 a$=INKEY$:IF a$ = "" THEN 380 
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<88> 390 IF a$="J" 0R a$="j" THEN GOTO 430 ELSE PRINT F 
N a t $ ( j + 1 , 1) ; zl$; :GOTO 260 

< 21> 400 1 - 

< 23 > 410 ' ****************. Ausdruck. *************** 

< 25 > 420 1 - 

<36> 430 WIDTH LPRINT 255:LPRINT esc$+"A" + CHRS(8);esc$ + 
"M";esc$+"E";esc$+" 1 " + CHR$(8);CHR${13);CHR$(24); 

<20> 440 a$=“f":GOSU0 730:n = 10*z:0 = 36:GOSUB 720:a$="l": 

GOSUB 730:LPRINT:zal1e = ze 11e+1 
<54> 450 FOR j = l TO 3:a$="e":GOSUB 730:n=10*z:o=0:GOSUB 
720:GOSUB 730:LPRINT:zei1e=ze11e+1:NEXT j 

< 9 7 > 460 a$ = "b":GOSUB 730:n = 10*z:o = 24:GOSUB 720:a$="h": 

GOSUB 730:LPRINT: zeile=ze11e+1 
<42> 470 FOR j = l TO 2 : a$= '' e " : GOSUB 730 : n= 10* z : o = 0 : GOSUB 
720:GOSUB 730:LPRINT:zei1e = ze11e+1:NEXT j 

< 46 > 480 a$= " e'' : GOSUB 730:IF LEN (ti te 1 $ ) >z THEN LPRINT 

SPC(z);:GOTO 530 

C 5 7 > 490 IF (LEN(t1tel$)*4)-2<=z THEN n=10*(((z-(4* LEN( 
t1tel$)-2))/2)):GOSUB 720:LPRINT breit$;:FOR j=l T 
0 (LEN{titel$)-l):LPRINT MID$(11te1 $,j,1);" ";:NEX 
T:LPRINT RIGHT$(t1tel$,1);;normal$; 

< 63 > 500 IF (LEN(titel$)*4)-2< = z THEN n = 10*((Z-(4*LEN(t 

1te1 $)-2))/2):GOSUB 720:G0TO 530 

< 5 7 > 510 IF LEN(t1tel$)*2<=z THEN n=10*((z-2*LEN{11te1 $ 

) ) /2) :GOSUB 720:LPRINT breit$;11te1 $;norma1 $; : n= 10 
*((z-2*LEN(t1tel$))/2>:GOSUB 720:GOTO 530 

< 85 > 520 IF LEN(t1tel$)<=z THEN n=10*((z-LEN(11te1 $)>/2 

):GOSUB 720:LPRINT t i te 1 $ ; : n= 10* < < z-LEN (11 te 1 $) )/2 
):GOSUB 720:GOTO 530 

< 49 > 530 GOSUB 730:LPRINT:ze11e = zei1e+1 

< 54> 540 FOR j = l TO 2:a$="e";GOSUB 730:n = 10*z:G0SU8 720 

:GOSUB 730:LPRINT:zelle=zeile+1:NEXT j 

< 9 6 > 550 a$="b":GOSUB 730:n=10*z:0 = 24:GOSUB 720:a$="h": 

GOSUB 730 : LPRINT : zei 1 e = zei 1 e+1 

< 73> 560 FOR j = l TO 4:a$=”e":GOSUB 730:n=10*z:o = 0:GOSUB 

720:GOSUB 730:LPRINT:zeile=zei1e+l:NEXT j 

< 77 > 570 FOR 1 = 1 TO 20 

<86> 580 m=LEN(text$(l ) ) * fakto r(1 ) 

< 5 6 > 590 a$="e":GOSUB 730:n = l0*((z-m)/2):GOSUB 720:LPRI 

NT art$(1);text$(1);normal$;:GOSUB 720:G0SUB 730:L 
PRINT:zeile=zei1e+1 

< 9 6 > 600 a$="e“:G0SU8 730:n = 10*z:GOSUB 720:GOSUB 730:LP 

RINT:zei1e=ze11e+1 

<28> 610 IF 105 AND 1 < > 10 AND 1015 AND 1020 THEN 640 
<91> 620 a$="b":GOSUB 730:n=10*z:o=24:GOSUB 720:a$="h": 
GOSUB 730:LPRINT:zeile=zeile+1 

< 54 > 630 a$=''e'':GOSUB 7 30 : n = 10* z : o = 0 : GOSUB 720:GOSUB 73 

0 : LPRINT;z e1le = zei le+1 

< 98> 640 IF zei1e > S-4 THEN 660 

< 49 > 650 NEXT 

< 89 > 660 FOR j = l TO <s-ze11e):a$="e":GOSUB 730:n=10*z:o 

=0:GOSUB 720:GOSUB 730:LPRINT:NEXT j 
<37> 670 a$=“c“:GOSUB 730:n=10*z:0=36:GOSUB 720::a$="1" 
:GOSUB 730:LPRINT 

< 39 > 660 GOTO 850 

<41> 690 • - 

<24> 700 ' ******, Graf i kzeichen auf Drucker. ******* 

< 26 > 710 ' - 

< 6 7 > 720 LPRINT esc$+”L” + CHR$(n MOD 256)+CHR$(n ö 256); 

:FOR p=l TO n:LPRINT CHR$(o);:NEXT p:RETURN 

< 72 > 730 LPRINT esc$+"L" + CHR${10)+CHR$(0); 

<65> 740 IF a$ = '' b " THEN LPRINT CHR$ < 4H0 ) | CHR$ ( S.H0 ) ; CHR$ 
( &HFF ) ; CHR$ ( &HFF ) ;CHR$(8,H0) ;CHR$(&HO) ;CHR${&HFF) ;C 
HR$(&HFF);CHR$(4H18);CHR$(&H18);:RETURN 
<7B> 750 IF a$="c" THEN LPRINT CHR$(&H0);CHR$(&H0);CHR$ 
(&HFC) ;CHR$(4HFC) ;CHR$(&H4>;CHR$(&H4) ;CHR$(4HE4) ;C 
HR$(&HE4);CHR$(&H24);CHR$(&H24);:RETURN 

< 22 > 760 IF a$ = "e" THEN LPRINT CHR$(&H0);CHR$(&H0);CHR$ 

(&HFF);CHR$(&HFF);CHR$(&H0);CHR${&H0) ;CHR${&HFF ) ;C 
HR$(&HFF);CHR$(&H0);CHR$<4H0);:RETURN 
<84> 770 IF a$="f" THEN LPRINT CHR$(&H0);CHR$(&H0>;CHR$ 
(&H3F);CHR$(&H3F);CHR$(&H20);CHR$(&H20);CHR$C&H27) 

;CHR$(&H2 7);CHR$(&H24);CHR$(&H2 4) ; :RETURN 

< 86 > 780 IF a$ = "h" THEN LPRINT CHR$(&H18);CHR$(&H18);CH 

R$ ( 4HFF ) ; CHR$ ( &HF F ) ;CHR$(8.H0) ;CHR$(&HO) ;CHR$(&HFF) 

;CHR$(&HFF);CHR$(&H0);CHR$<4H0);:RETURN 
<93 > 790 IF a$="i" THEN LPRINT CHR$(&H24);CHR$(&H24) ;CH 
R$(&HE4);CHR${4HE4);CHR$(&H4);CHR$(&H4);CHR$(&HFC) 

; CHR$ ( &HFC ) ; CHR$ ( &H0) ;CHR$(8,H0 ) ; : RETURN 

< 70 > 800 IF a$="k" THEN LPRINT CHR$(&H24) ;CHR$(&H24 ) ; CH 

R$(&HE4) ;CHR$(&HE4 > ;CHR$(&H4) ;CHR$<&H4) ;CHR$(4HE4) 

;CHR$(&HE4);CHR$(&H24);CHR$(4H24);:RETURN 
<B3 > 810 IF a$="1" THEN LPRINT CHR$(&H24) ;CHR$(&H24);CH 
R$(&H2 7);CHR$(&H2 7 >;CHR$(&H20) ;CHR$(&H20) ;CHR$(&H3 
F);CHR$(&H3F);CHR$(&H0);CHR$(&HO);:RETURN 

< 29 > 820 ‘ - 

<31 > 830 1 *************. Programmende. ************* 

< 33 > 840 • -- 

<18> 850 LPRINT esc$+"2";esc$+"F";CHR$(12) ;CHR$(13) ; 

<69> 860 PRINT cla$;"Programm beendet"; 

< 33 > 870 WIOTH 90,90:END 
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High-Speed - Höchsleffiziente Programmierung in Assembler. Auf dem 
Amiga jetzt nur noch 7 Sekunden für das "Apfelmännchen"! 
Mandelbrot- und Juliamenge - Mit automatischer Glättungsfunktion. 
Super-Parallel-Projektion - Frei wählbarer horizontaler Blickwinkel mit 
360Grad: Betrachten Sie das“Fraktalobjekt“ von allen Seiten. 
Stufenloser vertikaler Blickwinkel: - Wahlweise Sicht von oben, unten, 
schräg und in der Totalen einzeln und stufenlos einstellbar. 
Voller Bedienungskomfort - Auswahl komplett mit Pulldown-Menüs. 

Wahlweise Steuerung mit der Maus oder über die Tastatur. 
Mehrere separate Bildspeicher - Abspeicherung auf dem Amiga im 
IFF-Format. Verwendung der Bilder in anderen Programmen. 
Phantastische Farbmöglichkeiten - Separate Farbzuordnung für die 
einzelnen Bilder. Animationsmöglichkeit durch Color-Cycling. 
Die Farben lassen sich auch nachträglich beliebig verändern. 

Fraktal Generator 3D 

MS-DOS ab 2.0; PC-XT/AT mit EGA-Karte oder 
Amstrad/Schneider PC 1512. 

5 1/4“- oder 3 1/2“-Disk 


-Amiga or\ 

Fraktal Generator OL/ 


Commodore Amiga mit 512 KB, 3 1/2"-Disk. 

69,- 

DM* 

- Atari on 

Fraktal Generator OU 

Atari ST, 3 1/2“ 

69,- 

DM* 

c p c on 

Fraktal Generator OU 

CPC 464 / 664 / 6128, Kassette 

39,- 

DM* 

CPC 464 / 664 / 6128, 3“-Disk 

49,- 

DM* 

Demodiskette: Fraktal Generator 3D, MS-DOS 


5,- DM 


★ Unabhängig von der Anzahl der bestellten Programme berechnen wir für das 

Inland 4.- DM bzw. 6,- DM Porto/Verpackung. - Unverbindliche Preisempfehlung - 

Bitte Bestellkarte benutzen 

DMV-Verlag ■ Postfach 250 • 3440 Eschwege 


69,- DM* 
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Die JOYCE-PC-Kopplung 

Kermit - 

Daten übertragen leichtgemacht 

Kermit ist ein vielseitiges Datenübertragungs- und Konununikationspro- 
gramni, dessen Beliebtheit zum großen Teil darauf beruht, daß es nicht nur 
kostenlos (“Public Domain“), sondern auch auf nahezu jeder Rechenanlage 
von CP/M über MS/DOS und UNIX bis hin zum Großrechner verfügbar 
ist. Daß auch JOYCEr Bedarf an einem solchen Programm haben können, 
ergibt sich leicht aus der großen Anzahl von Rechnern der PC- und AT- 
Klasse, die zwar JOYCEs Disketten nicht lesen und beschreiben, JOYCEs 
Daten dafür aber uni so schneller verarbeiten können. 


Eine Lösung der Frage, wie man beide 
zusammenbringt, ist — wie so oft — 
der Weg über die serielle Schnittstelle, 
wobei Kermit die Hauptarbeit leistet. 
Dieser Artikel stellt dieses leistungsfä¬ 
hige Programm vor und gibt für die 
Datenübertragung zwischen JOYCE 
und PC die nötige Anleitung. 

Daten zwischen zwei grundverschiede¬ 
nen Rechnern zu übertragen, ist gar 
nicht so schwer — Sie brauchen dazu 
nur je eine serielle Schnittstelle, eine 
elektrische Verbindung (Schnittstellen¬ 
kabel) und auf beiden Seiten dieser 
Verbindung je ein Programm, das 
weiß, wie man mit Kabel und Schnitt¬ 
stelle und natürlich mit Ihren Dateien, 
richtig umgeht — beispielsweise eben 
Kermit. 

Was Sie dazu wissen müssen, wird Ih¬ 
nen dieser Artikel vermitteln. 

Kermit - der Name ist, wie man hört, 
keine Abkürzung, sondern das kelti¬ 


sche Wort für “Public Domain“ — 
wurde von 1981 bis 1988 in vielen Ver¬ 
sionen und unter internationaler Betei¬ 
ligung von Softwareexperten an der 
Columbia-Universität in New York ent¬ 
wickelt. Aus diesen Bemühungen ent¬ 
stand ein universelles Programm, das 
in der Lage ist, sowohl gleiche wie 
auch unterschiedlichste Computer mit¬ 
einander zu verbinden, und damit so¬ 
wohl Brücken für die Übertragung von 
Daten und Dateien schafft wie auch die 
Möglichkeit bietet, einen Rechner an 
einen vielleicht völlig unterschiedli¬ 
chen anderen als Terminal anzuschlie¬ 
ßen - direkt per Kabel oder über Tau¬ 
sende von Kilometern hinweg. 

Egal mit welchen Rechnern Sie dabei 
zu tun haben: Ihnen als Benutzer prä¬ 
sentiert sich Kermit immer in gleicher 
Form als “intelligente“ Oberfläche, die 
- ähnlich wie bei DOS oder CP/M - 
von einer einfachen Kommandospra¬ 


che gesteuert wird und Ihre Wünsche 
zur Ausführung bringt. 

Die Benutzung von Kermit ist einfach: 
Es muß nur — in seiner jeweiligen Ver¬ 
sion — auf beiden miteinander verbun¬ 
denen Rechnern gestartet werden, und 
dann geben Sie die Befehle für die 
Übertragung von Daten oder Dateien 
ein. Mit wenigen Kommandos können 
Sie einzelne Dateien oder ganze Dis¬ 
ketteninhalte hin- und herschicken, 
wobei für die Datensicherheit automa¬ 
tisch gesorgt wird. 

Ein Blick hinter die Kulissen 

Die Funktionsweise von Kermit beruht 
auf einer genialen Idee, die unter dem 
Namen “automatisches Übertragungs¬ 
protokoll“ bekannt ist. Die Aufgabe, 
Daten optimal von einem Ort zum an¬ 
deren zu bringen, wird dabei ganz dem 
Zusammenspiel von zwei gleichartigen 
Programmen — eben zwei Kermits - 
auf den beteiligten Rechnern überlas¬ 
sen, die sich durch Austausch von 
Steuerinformation untereinander und 
aufeinander abstimmen. So ist es auch 
möglich, daß Kermits auf verschieden 
leistungsfähigen Rechnern und in 
zwangsläufig verschieden starken Ver¬ 
sionen Zusammenarbeiten. 

Die Übertragung von Nutzdaten (Da¬ 
teien und so weiter) und Steuerinfor¬ 
mation geschieht auf einer seriellen 
Verbindungsleitung (Draht, Tele¬ 
fon...) mit angepaßter Geschwindig¬ 
keit (meist recht flott) und womöglich 
vollduplex, also in beiden Richtungen 
gleichzeitig. Die Daten werden dabei 
in kleinen Einheiten (“Paketen“) über¬ 
tragen, denen jeweils eine Prüfinfor¬ 
mation beigefügt ist, anhand derer der 
Kermit, der sich gerade in der Rolle 
des Empfängers befindet, erkennen 
kann, ob die Daten richtig übertragen 
wurden, und gegebenenfalls ein fehler¬ 
haftes Datenpaket wiederholt anfor¬ 
dern kann. Die Datenübertragung über 
eine gute Verbindung (zum Beispiel 
Direktkopplung zweier Rechner) geht 
dadurch recht schnell, während auch 
bei schlechten Leitungen, etwa im Te¬ 
lefonverkehr, eine einwandfreie Über¬ 
tragung gesichert werden kann. 

Um sich den verschiedensten Einsatz¬ 
bedingungen anpassen zu können, bie¬ 
tet Kermit eine Vielzahl von Einstel¬ 
lungsmöglichkeiten, die von der Ein¬ 
richtung der Benutzeroberfläche bis 
hin zu den Einzelheiten der Datenüber¬ 
tragung selbst reichen. Bei Bedarf ha¬ 
ben Sie über den Ablauf last die totale 
Kontrolle. Mit diesen Einstellungen 
brauchen Sie sich jedoch nicht zu be- 
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fassen, wenn Sie Kermit nur zur Rech¬ 
nerkopplung benutzen wollen, denn im 
folgenden finden Sie die kompletten 
Voreinstellungen, wie sie für die Kopp¬ 
lung zwischen JOYCE und einem PC 
ermittelt und ausgetestet wurden, in 
Form von Batch- beziehungsweise 
SUBMIT-Dateien für beide Systeme 
bereits fertig vorliegen. 

Kermit in Aktion 

Da die Vielseitigkeit der Anwendungs¬ 
möglichkeiten von Kermit den Rahmen 
dieses Artikels sprengen würde, be¬ 
gnügen wir uns hier mit der direkten 
Kopplung (über ein Kabel) zwischen 
Ihrem JOYCE und einem beliebigen 
“ziemlich kompatiblen“ PC. Es bleibt 
Ihnen selbstverständlich unbenommen, 
die Übertragung über größere Entfer¬ 
nung, etwa mit Hilfe eines Modems, 
ablaufen zu lassen oder sich mit Hilfe 
von Kermit auch mit ganz anderen 
Rechnern als PCs zu “unterhalten“; am 
grundsätzlichen Verfahren ändert sich 
dabei nichts. 

Für Ihre Rechnerkopplung benötigen 
Sie: 


ECHO OFF 

REM Dateiname:KERMITJR.BAT 

REM KERMIT Grundeinstellung für PC 

REM JOYCE <—> PC 

MODE COM1:4800,N,8,1,P 

CLS 

KERMIT.EXE 


Abb. I: Die PC-Grundeinstellung für den stö¬ 
rungsfreien Datenaustausch von JOYCE und PC 

• Ein serielles Schnittstellenkabel für 
Direktkopplung, das ist ein sogenann¬ 
tes Null-Modem-Kabel (eben ein “Ka¬ 
bel für kein Modem“), wie es weiter 
unten beschrieben ist; das Kabel kann 
bis zu drei Meter lang sein, unter gün¬ 
stigen Bedingungen auch bis zu 30 
Meter. 

• Die serielle Schnittstelle für JOYCE 
(die “SIO“-Einheit CPS-8256 aus dem 
Zubehör) und eine freie serielle 
Schnittstelle am PC. In diesem Artikel 
wird die erste Schnittstelle (COM1:) 
verwendet. Sie können das jedoch nach 
Belieben ändern. Wenn Sie an einer der 
benötigten Schnittstellen gewöhnlich 
eine Maus betreiben, müssen Sie die al¬ 
lerdings entfernen und eine Kopie Ihres 
Betriebssystems verwenden, in der kei¬ 
ne Maus installiert ist, damit die 
Schnittstelle zur Verfügung steht. 


• Die Programme KERMIT.COM 
(JOYCE) und KERMIT.EXE (PC). 
Wir haben folgende Versionen gete¬ 
stet: auf dem JOYCE die Version 3.9 
(in der Fassung als “Generic Kermit“) 
und auf dem PC die Version MS- 
(DOS)-Kermit 2.30 (KERMIT23.EXE). 
Am Ende dieses Artikels finden Sic ei¬ 
nen Hinweis darauf, wo Sie diese Soft¬ 
ware bekommen können. 

• Der benötigte Speicherplatz hält sich 
in Grenzen. Der JOYCE-Kermil ist nur 
13 kByte groß. Der PC-Kermit ist 86 
kByte groß und läuft bereits in 128 
kByte freiem Speicher. 

• Zum Einstellen der seriellen Schnitt¬ 
stelle brauchen Sie auf dem JOYCE 
noch die CP/M-Systemkommandos 
DEVICE.COM und SETSIO.COM 
und auf dem PC das Systemkommando 
MODE.COM. Die notwendigen System¬ 
einstellungen befinden sich in den Da¬ 
teien KERMITxx.SUB beziehungs¬ 
weise .BAT (siehe Abbildung bezie¬ 
hungsweise Databox), die Sie nur auf¬ 
zurufen brauchen. Dabei wird KER¬ 
MIT gleich mit gestartet. Die Namens¬ 
endungen (xx) dieser Dateien bestehen 
aus zwei Kennbuchstaben: 
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JOYCE 


J = Kopplung an JOYCE vom PC aus 
(MS-DOS-. BA T-Datei) 

P = Kopplung an den PC von JOYCE 
aus (CP/M-. SUB-Ddtei) 

S = JOYCE soll Dateien nur senden 
(send) 

R = JOYCE soll Dateien auch empfan¬ 
gen ( receive ) 

Die zwei unterschiedlichen Versionen 
für die Einstellungen “S“ und "R“ sind 
deshalb erforderlich, weil zum Emp¬ 
fangen von Dateien auf JOYCE die 
Übertragungsgeschwindigkeit etwas 
reduziert werden muß. Sie können na¬ 
türlich auch ausschließlich mit der 
langsameren Version arbeiten. Dann 
brauchen Sie auf jedem Rechner nur je 
eine einzige .SUB- beziehungsweise 
.ZM7’-Datei. Die Einstellung auf “R“ 
oder “S rt muß jedenfalls übereinstim¬ 
men, da sonst die Übertragung nicht 
funktioniert. 

Um Ihre Rechnerkopplung zu starten, 
gehen Sie wie folgt vor: 

O Verbinden Sie die seriellen Schnitt¬ 
stellen beider Rechner mit dem Verbin¬ 
dungskabel. 

O Stellen Sie sicher, daß CP/M bezie¬ 
hungsweise DOS alle benötigten Datei¬ 
en im Suchpfad beziehungsweise auf 
dem aktuellen Laufwerk verfügbar hat. 
O Rufen Sie an beiden Rechnern KER- 
MITxx auf (siehe oben), also zum Bei¬ 
spiel 

C: \TEST\ > KERMITJR 
3M> SUBKIT KERMITPR 

Danach befinden Sie sich auf beiden 
Rechnern in KERMIT und können mit 
den KERMIT-Befehlen arbeiten. 

Die Bedienung von Kerniit auf 

dem JOYCE 

Sie sehen nun den normalen 
CP/M-Prompt erweitert um die Anga¬ 
be “Kermit-80“ und können folgende 
Befehle eingeben: 


ECHO OFF 

REM Dateiname:KERMITJS.BAT 
REM Kermit Grundeinstellung 
REM JOYCE -> PC 
MODE COM1:9600.N,8,1,P 
KERMIT.EXE 


Abb. 2: Diese Einstellung ermöglicht dem PC 
das Empfangen von Daten mit einer Geschwin¬ 
digkeit von 9600 Baud. 

• Datei(en) zum PC senden: 

SEND <Dateiname> 

Die Datei muß sich auf dem aktuellen 
Laufwerk befinden, oder Sie müssen 
den Laufwerksnamen mit angeben. Mit 
SET DEFAULT-DISK können Sie das 
aktuelle Laufwerk wechseln. Der Da¬ 
teiname kann auch mehrdeutig sein, 
dann werden alle darauf passenden Da¬ 
teien übertragen. Der Befehl zum 
Empfangen der gesendeten Dateien 
muß am PC manuell eingegeben wer¬ 
den. Während der Übertragung zeigen 
beide Rechner die Nummer des aktuel¬ 
len Datenpakets und eventuelle Wie¬ 
derholungen bei der Übertragung an. 

• Datei(en) vom PC empfangen: 

RECEIVE 

Hier werden keine Dateinamen ange¬ 
geben, sondern es wird das empfangen, 
was der PC sendet. Der Dateiname ist 
bei Kermit nämlich in den gesendeten 
Datenpaketen enthalten. Wenn eine 
Datei gleichen Namens schon existiert, 
benennt Kermit die neue Datei in einen 
ähnlichen Namen um. Allerdings sollte 
man hier besonders in der JOYCE- 
Version etwas aul'passen, weil dem 
CP/M-Kermit schnell die ähnlichen 
Dateinamen ausgehen. Ähnliches gilt 
bei Dateinamen, die im Kermit oder im 
Betriebssystem des Empfängers nicht 
zulässig sind. Die empfangene Datei 
landet stets auf dem aktuellen Lauf¬ 
werk, das mit SET DEFAULT-DISK 
eingestellt werden kann. Der Befehl 
zum Senden der gewünschten Dateien 
muß am PC manuell eingegeben 
werden. 

GET < Dateiname > 

Dieses Kommando wirkt wie RECEIVE, 
nutzt jedoch die Fähigkeit des Gegen¬ 


übers (PC-Kermit) aus, im sogenann¬ 
ten SERVER-Betrieb zu laufen. Das 
bedeutet, daß dem Kermit auf dem PC 
nicht über die PC-Tastatur mitgeteilt 
wird, was er tun soll, sondern die Be¬ 
fehle kommen über die Übertragungs¬ 
leitung vom JOYCE. Wenn Sie auf 
dem JOYCE 

GET < Dateiname> 

eingeben, erzeugt der JOYCE-Kermit 
automatisch einen entsprechenden 

SEND 

-Befehl und schickt diesen zum PC. Sic 
brauchen somit am PC nichts mehr ein¬ 
zugeben. zumindest solange keine Feh¬ 
ler auftreten. < Dateiname> ist der 
Name einer Datei auf dem PC und wird 
auf dem JOYCE wie bei RECEIVE be¬ 
handelt. < Dateiname > kann auch 
mehrdeutig sein. Der PC-Kermit muß 
bereits als SERVER laufen, um auf die 
Sendeanforderung reagieren zu kön¬ 
nen. 

• “Unterhaltung“ von Tastatur zu Bild¬ 
schirm 

CONNECT 

Wenn Sie diesen Befehl eingeben, be¬ 
treibt Kermit den Rechner, an dem Sie 
sitzen, als Terminal. Was Sie eintip¬ 
pen, wird Zeichen für Zeichen an den 
Partnerrechner geschickt, und was von 
dort kommt, erscheint auf dem Bild¬ 
schirm. Wenn der Partnerrechner ein 
Mini- oder Großrechner wäre, könnten 
Sic so Programme ausführen, als säßen 
Sie direkt an diesem Rechner. Wenn 
beiden Rechnern CONNECT eingege¬ 
ben wird, können sich zwei Benutzer 
überden Bildschirm “unterhalten“. Da 
die Übertragung langsam zeichenweise 
erfolgt, eignet sie sich auch zum Testen 
der Verbindung. Um den Terminalmo¬ 
dus wieder zu verlassen, geben Sie 
Control-Ö gefolgt von einem C ein. 

• Weitere Befehle und Hilfefunktion 
Die wichtigsten Kermit-Befehle zum 
Anzeigen und Ändern der Übertra¬ 
gungsparameter und so weiter finden 
Sie unten in der Befehlsliste. 

Zu Ihrer Unterstützung bietet Kermit 
eine intelligente Hilfefunktion: Wenn 
Sie in der Kommandozeile nicht weiter 
wissen, tippen Sie statt eines Komman¬ 
dos oder Kommandoparameters ein¬ 
fach ein Fragezeichen und RETURN 
ein und bekommen dann die möglichen 
Kommandos beziehungsweise die 
möglichen Fortsetzungen des Kom¬ 
mandos, das Sie gerade eintippen, an¬ 
gezeigt. Das Fragezeichen funktioniert 
überall außer dort, wo es einem mehr¬ 
deutigen Dateinamen entsprechen 
könnte. Die Kommandozeile wird Ih¬ 
nen anschließend so wieder angeboten. 


; Datei:KERMITPR.SUB 

; KERMIT Grundeinstellung für Joyce 
; JOYCE <—> PC 

device auxout:=sio 
device auxin:=sio 

setsio 4800 parity none bits 8 stop 1 xon on handshake off 

kermit.com 

<set local on 

<set file-mode binary 


Abb. 3: Die JOYCE-SUBMIT-Datei für den Austausch von Daten zwischen PCWund PC 


76 PC 11 '89 


















JOYCE-n 


wie Sie sie angefangen haben, so dali 
Sie gleich weitertippen können. Wenn 
Sie die angefangene Kommandozeile 
nicht weitertippen wollen, können Sie 
sie mit TU löschen. 

Die Bedienung von Kermit auf 
dem PC 

Übrigens: Wenn Sie auf der JOYCE 
gelegentlich von Kermit eine Meldung 
bekommen wie: ?Unrecognized Com- 
mand , obwohl Sie ein gültiges Kom¬ 
mando eingegeben haben, dann haben 
Sie sich vermutlich einfach vertippt, 
und beim Korrigieren ist es dem Sy¬ 
stem nicht gelungen, eine vernünftig 
korrigierte Fassung Ihrer Eingabe her¬ 
zustellen, auch wenn auf dem Bild¬ 
schirm alles stimmt. Die Eingaberouti¬ 
ne der Implementation von Kermit auf 
dem JOYCE reagiert leider nicht auf 
die <DEL-Taste, sondern nur auf 
Control-H, und Tippen von < DEL er¬ 
zeugt ein nicht mehr löschbares Fehler¬ 
zeichen. Am besten löschen Sie in ei¬ 
nem solchen Fall die Eingabezeile mit 
TU und schreiben das “fehlerhafte“ 
Kommando einfach noch einmal. 


Auf dem PC funktioniert Kermit ge¬ 
nauso wie auf JOYCE, Sie haben ledig¬ 
lich eine leistungsfähigere Version vor 
sich. In der Kommandozeile sehen Sie 
hier den Prompt 
Kermit-MS> 

Es gibt eine Reihe zusätzlicher Befeh¬ 
le, die allerdings in Verbindung mit 
dem JOYCE-Kermit nicht alle ausge¬ 
nutzt werden können, da eine Kermit- 
Kopplung wesentlich darauf beruht, 
daß sich beide Partner auf ein Lei¬ 
stungsniveau einigen. Die Hilfe-Funk¬ 
tion reagiert auf ein Fragezeichen so¬ 
fort, ohne daß Sie RETURN zu 
drücken brauchen. Der wichtigste Zu¬ 
satzbefehl im PC-Kermit ist wohl 

SERVER 

Wenn Sie diesen Befehl eingeben, be¬ 
ginnt der PC als Kermit-Server zu ar¬ 
beiten wie oben unter GET beschrie¬ 
ben. Auf dem Bildschirm erscheint da¬ 
bei so lange nichts, bis von JOYCE aus 
eine Übertragung angestoßen wird. 
Der Server-Modus kann mit TC been¬ 
det werden. Falls Sie ihn einmal wäh¬ 
rend einer Übertragung abbrechcn 
möchten, sollten Sie zuerst die Über¬ 
tragung mit einer der unten angegebe¬ 


nen Unterbrechungsmöglichkeiten ge¬ 
ordnet beenden. 

SEND 

und 

RECEIVE 

bieten gegenüber JOYCE zusätzlich 
die Möglichkeit, der übertragenen Da¬ 
tei (vorher beziehungsweise nachher) 
einen neuen Namen zuzuordnen. Dazu 
geben Sie einfach den Dateinamen Ih¬ 
rer Wahl zusätzlich an. Dateiangaben 
in der PC-Version dürfen komplette 
DOS-Pfadangaben enthalten. Bei 
mehrdeutigen Dateinamen verwendet 
MS-DOS-KERMIT anstelle des Frage¬ 
zeichens das Doppelkreuz (#)! 

CONNECT 

funktioniert genau wie auf dem JOYCE, 
nur mit etwas schönerem Bildschirm¬ 
aufbau. Der Control-Code zum Verlas¬ 
sen des Connect-Modus (Control-Ö) 
liegt auf einer “deutschen“ PC-Tasta- 
tur etwas versteckt, zum Beispiel auf 
Control-+ (links neben RETURN). 
Sie können ihn mit SET ESCAPE 
< Taste > ändern. Vergessen Sie 
nicht, beim Verlassen von CONNECT 
auch C zu drücken, um wieder in die 
Kommandozeile zu kommen. 


Sesam öffne dich! 

BCi DisAsm erschließt jedes Programm! 

Wandelt den Hexdump in ein dokumentiertes Assemblerlisting um und 
kann nach Modifizierung oder Änderung durch einen Editor mit 
gängigen Assemblern oder Debuggern wieder assembliert werden. 

BCi DisAsm - Es gibt kaum einen, der ihm das Wasser reichen kann! 

Auch Experten kennen nicht immer die Lösung, aber sie wissen, wo sie 
suchen müssen. 

BCi DisAsm hilft JEDEM, die verwirrenden und 
frustrierenden Software-Puzzle, welche sich beim Umgang mit dem 
Computer ergeben, zu lösen. Und zwar schneller als mit jedem anderen 
Produkt, das Sie erwerben können, egal welche Preisklasse Sie be¬ 
trachten. 

Mit dem BCi DisAsm erwerben Sie Know-How, das Sie sonst Jahre an Er¬ 
fahrung kosten würde. Versuchen Sie nicht, das Rad neu zu erfinden! 

BCi DisAsm - Der intelligente Disassembler 
BCi DisAsm ist ein intelligenter, selbsttätig dokumentierender MS-DOS 
Disassembler. Die ausgefeilten Routinen im BCi DisAsm analysieren in 
kürzester Zeit selbst komplexen und umfangreichen Programmcode und 
zeigen dabei potentielle Problempunkte auf 



BCi DisAsm - Das Lernmittel 

Sie brauchen kein Spezialist in Assembler-Programmierung zu sein. BCi 
DisAsm produziert aus jedem beliebigen Programm ihres IBM- 
kompatiblen Computers ein gut dokumentiertes, leicht verständliches As¬ 
semblerlisting. 

BCi DisAsm - Einfach in der Handhabung 

BCi DisAsm kann sowohl über Parameter von der DOS-Kommandozeile 
aus als auch interaktiv über Menues gesteuert werden. Die Menuestruk- 
tur ist Lotus-kompatibel, selbstverständlich in Deutsch. Es besteht keine 
Notwendigkeit, neue Befehle zu lernen oder ständig im Handbuch nach¬ 
zuschlagen. BCi DisAsm ist unmittelbar anwendbar! 

Minimale Systemanforderungen 

256 kB RAM, 8088/8086/80186/80286 oder 80386 CPU, 

MS-DOS oder PC-DOS Version 2.0 oder größer 


1. Lernen Sie Assembler-Programmie¬ 
rung, wenn Sie möchten. 

2. Entdecken Sie, warum Programm 
XYZ auf ihrem Rechner nicht läuft, 
und tun Sie etwas dagegen. 

3. Ändern oder entfernen Sie Pro¬ 
grammteile. 

4. Sichern Sie sich gegen destruktive 
Programme ab. Finden Sie einen 
“Virus“, und entfernen Sie ihn. 


Integrieren Sie Code aus compilierten 
Programmen in eigene Anwen¬ 
dungen. 

6. Erhöhen Sie die Kompatibilität Ihrer 
Software. 

7. Passen Sie Software an verschiedene 
MS-DOS-Versionen an. 


BCi DisAsm kostet inkl. eines sehr ausführlichen 
deutschen Handbuchs (mehr als 100 Seiten) nur 

Best.-Nr. 2275 1/4'-Disk. 
Best.-Nr. 233 3 1/2'-Disk. 


199.- DM (unverbindlich Preisemplehlung) 

Wenn Sie über den DMV-Beslallservice beslellen, gilt folgendes: 
Inland: Ausland: 

Einzelpreis 199, - DM Einzelpreis 199,-DM 

zzgl. Versandkosten 4,-DM zzgl. Vsrsandkoslan 6.-DM 

endpreis 203,-DM Endpiels 205.- DM 


® 1987 BCi, West Germany und USA 
Lotus ist eingetragenes Warenzeichen der Lotus Corp. 
MS-DOS ist eingetragenes Warenzeichen der Microsoft Corp. 

Händleranfragen willkommen 


BCi DisAsm wird Ihnen bei den folgenden Schritten helfen: 

5. 


Bestellen Sie noch heute mittels der entsprechenden Postkarte bei: 


DMV-Verlag, Postfach 250, 3440 Eschwege 
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; Datei 

: KERMITPS.SUB 


; Grund 

einstel1ung 

für 

Joyce 

; JOYCE 

— > PC 



device 

auxout:=sio 



device 

auxin:=sio 



setsio 

9600 parity 

none 

bits 8 stop 1 xon on handshake off 

kermit. 

com 



< set 1c 

ca t on 



< set fi 

le-mode bin« 

jry 



Abb. 4: Mit dieser Einstellung kann der JOYCE nur senden, nicht aber empfangen 


U nt erbrechung sm öglichkeiten 

Gelegentlich passiert es, daß Kermit 
endlos auf eine Reaktion von außen 
wartet, die nicht eintritt, oder die Über¬ 
tragung einer Datei ist stark gestört. In 
so einem Fall haben Sie eine Reihe von 
Möglichkeiten, über die Tastatur ein¬ 
zugreifen durch Eingeben von Control- 
Codes: 

CR - Simulieren eines Übertragungs¬ 
fehlers: Das aktuelle Paket wird noch¬ 
mals übertragen (das heißt gesendet be¬ 
ziehungsweise vom Sender angefor¬ 
dert). 

TX - Senden der Datei abbrechen und 
gegebenenfalls die nächste senden; der 
andere Kermit wird durch einen Feh¬ 
lercode benachrichtigt und reagiert ent¬ 
sprechend. 

TZ - Wie TX, aber gegebenenfalls 
noch anstehende weitere Dateien nicht 
senden. 

TC - Bricht jede Übertragungs- oder 
Warteoperation sofort ab (außer dem 
Terminalmodus, siehe CONNECT). 
Auf den Übertragungspartner wird kei¬ 
ne Rücksicht genommen. 

Achtung: Drücken von TC unterläuft 
die Fehlerkontrollen von Kermit. 
Wenn man beim Senden einer Datei TC 
drückt, kann es auf der Empfangsseite 
passieren, daß eine noch unvollständi¬ 
ge Datei behandelt wird, als wäre sie 
vollständig übertragen worden! TC 
wird daher gewöhnlich nur dann ange¬ 
wendet, wenn die Verbindung ohnehin 
bereits zusammengebrochen ist. Dafür 
hilft es auch in Fällen, in denen sonst 
die Systemmeldung “... nicht be¬ 
reit ...“ unvermeidlich wäre. Um einen 
möglichst geordneten Abbruch zu er¬ 
zielen, sollten Sie im Zweifelsfall die 
verschiedenen Möglichkeiten der Rei¬ 
he nach durchprobieren. 

Hinweis: Auf dem JOYCE gibt es eini¬ 
ge Fälle, in denen TC nicht wirkt, zum 
Beispiel, wenn RECEIVE vom PC 
nicht beantwortet wird, weil der PC- 
Kermit nicht sendet, nicht in Betrieb 
oder der PC nicht angeschlossen ist. In 


diesem Fall kommt man mit TU in die 
Kommandozeile zurück. 

Ein- Tasten-Befehl e beim 
Verlassen von CONNECT 

Nach der Eingabe von < Control-Ö > , 
um aus dem Terminalmodus herauszu¬ 
kommen, kann man eine Reihe von 
Ein-Tasten-Befehlen eingeben. Das 
“C“ in “< Control-Ö > C“ ist einer 
davon (“C u wie “Close“, Verbindung 
aufheben). Diese Befehle werden hier 
nicht weiter besprochen; Sie sollten 
aber wissen, daß es sie gibt, damit Sie 
keine Überraschungen erleben. Das 
Ein-Tasten-Kommando “?“ listet die 
verfügbaren Ein-Tasten-Kommandos 
auf. 

Befehlsübersicht von A bis Z 

Hier werden nur die Funktionen be¬ 
schrieben, die für die JOYCE- 
PC-Kopplung notwendig sind. Eine 
vollständige Liste entnehmen Sie bitte 
den Original-Dokumentationsdateien 
der Kermit-Versionen (36 beziehungs¬ 
weise 270 kByte!) 

Befehle beider Versionen 
BYE 

Beenden der Verbindung zu einem 
Kermit-Server und von Kermit selbst. 
Der Server wird dabei ebenfalls been¬ 
det (!), und beide Kermits werden ver¬ 
lassen. (Siehe Hinweise.) 

CONNECT 

Der eigene Rechner spielt Terminal. 
Siehe oben. 

ERA < Datei > 

Datei am eigenen Rechner löschen. 
MS-DOS-Version: DELETE. 

DIR 

Aktuelles Inhaltsverzeichnis des eige¬ 
nen Rechners anzeigen. MS-DOS-Ver¬ 
sion: DIRECTORY (darf abgekürzt 
werden). Angabe einer Dateimaske ist 
möglich. 

EXIT 

Den “eigenen“ Kermit verlassen (ins 
Betriebssystem), ohne die Verbindung 


über die Schnittstelle abzubrechen. 
FINISH 

wie BYE, aber der beendete Kermit- 
Server landet in der Kermit-Komman- 
dozeile. 

GET < Datei > 

Der eigene Kermit schickt die Anfor¬ 
derung an einen Kermit-Server, die 
Datei mit dem ursprünglichen Namen 
< Datei > zu senden, und empfängt 
das, was gesendet wird. (Siehe oben.) 
HELP 

Liste der gültigen Kommandos anzei¬ 
gen (wie “?“) 

LOG < Datei > 

Im CONNECT-Modus empfangene 
Daten werden in einer Datei mitge¬ 
schrieben. MS-DOS-Version: LOG 
SESSION. 

LOGOUT 

Kommunikation mit einem Kermit- 

Server beenden 

RECEIVE 

Datei(en) empfangen. Es wird im Prin¬ 
zip gewartet, bis es etwas zu empfan¬ 
gen gibt. MS-DOS-Version mit Optio¬ 
nen (siehe oben). 

SEND < Datei > 

Datei senden. Beim MS-DOS-Kermit 
darf zusätzlich ein zweiter Dateiname 
angegeben werden, der anstelle des ur¬ 
sprünglichen Namens gesendet wird. 
SET < Parameter >< Wert > 

Setzen einer Vielzahl von Parametern 
für die Übertragung und für das Ver¬ 
halten von Kermit überhaupt (siehe 
SET-Parameter). 

SHOW 

Anzeigen der aktuellen Parameterein¬ 
stellungen. In CP/M wie STATUS, im 
MS-DOS-Kermit befinden sich hierun¬ 
ter weitere Anzeigemöglichkeiten, die 
man mit SHOW ? aufgelistet bekommt. 
STATUS 

Anzeigen der aktuellen SET-Parameter- 

einstellungen 

TRANSMIT < Datei > 

Datei “roh“ (an einem Stück und ohne 
Prüfsumme) schicken. Nur für Text zu 
verwenden. Der empfangende Rechner 
muß dazu im CONNECT-Modus lau¬ 
fen und kann dann die Daten mit Hilfe 
von LOG (siehe oben) auffangen. 

Nur MS-DOS-Version 
CLOSE 

Logdatei schließen und das "Mitschrei¬ 
ben“ beenden 
CWD <path> 

Aktuelles Inhaltsverzeichnis wechseln 
(am eigenen Rechner) (nur MS-DOS) 
PUSH 

COMMAND.COM aufrufen (vor¬ 
übergehend) 

RUN < Kommandozeile > 
DOS-Kommando ausführen 
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REMOTE < Befehl > 

< Befehl > wird auf dem anderen (!) 
Rechner ausgeführt. Leider kann die 
CP/M-Version derartige Anforderun¬ 
gen nicht erzeugen. 

SERVER 

Kermit-Serverbetrieb aufnehmen (sie¬ 
he Erläuterung). 

SPACE 

Freien Disketten/Plattenplatz anzeigen 
TYPE <filespec> 

Datei (vom eigenen Rechner) anzeigen 

Die wichtigsten SET-Parameter: 

SET BAUD < Baudrate > 
Übertragungsgeschwindigkeit cinstel- 
len. Funktioniert nur in der MS- 
DOS-Version, in CP/M muß SET- 
SIO.COM benutzt werden (vor dem 
Aufruf von Kermit). 

SET BLOCK < Kennziffer > 

Einstellen der Fehlererkennung 
(Blocksicherung). Bei “1“ wird pro 
Paket ein Byte als Prüfsumme gesen¬ 
det, bei “2“ zwei Bytes und bei “3“ ein 
16-Bit-CRC-Code nach der CCITT- 
Norm. Je besser die Fehlersicherung 
ist, desto mehr Zeit beansprucht sie 
aber auch. Für direkte Rechnerkopp¬ 
lung reicht die einfache Prüfsumme je¬ 
denfalls aus. 

SET DEBUG (ON,OFF,PACKETS, 
SESSION] 

Anzeigen sämtlicher übertragenen In¬ 
formation, um verzwickte Fehler - 
etwa wenn eine Übertragung über meh¬ 
rere Computernetze läuft — von Hand 
aufspüren zu können. Nur bei MS- 
DOS-Version. 

SET DEFAULT-DISK < Laufwerk > 
Laufwerk für Dateiübertragung vor¬ 
geben 

SET EOF [CTRL-Z,NOCTRL-Z] 
Angabe, ob an eine Datei ein Control-Z 
angehängt wird (CP/M und manche al¬ 
ten MS-DOS-Programme brauchen es 
als Dateiende-Kennung, ein “pures“ 
MS-DOS braucht es nicht.) 

SET ESCAPE < Zeichen > 

Angabe, welches Zeichen den CON- 
NECT-Modus beenden soll 
SET FLOW-CONTROL [XON/ 
XOFF.NONE] 

Ein/Ausschalten des Software-Hand- 
shakes für Duplexbetrieb (nur MS- 
DOS-Version, im CP/M mit SETSIO 
einzustellen) 

SET HANDSHAKE CODE <ASCII- 
Wert> 

Sende-Übergabezeichen für Halbdu¬ 
plexbetrieb. In der CP/M-Version 
nicht verfügbar und deshalb nicht ver¬ 
wendet. 
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SET FILE-MODE < Dateiart > 

Nur in CP/M, um sicherzustellen, daß 
keine Control-Zeichen bei der Übertra¬ 
gung verlorengehen; die MS- 
DOS-Version macht es automatisch 
richtig. Man kann beruhigt immer mit 
“BINARY“ arbeiten. 

SET IBM 

setzt eine ganze Anzahl von Übertra¬ 
gungsparametern auf einmal passend 
für Kommunikation mit IBM-Rech- 
nem. Hier nicht relevant, auf der MS- 
DOS-Version auch nicht als ein Befehl 
verfügbar. 

SET LOCAL-ECHO (ON,OFF) 
Local-Echo OFF bewirkt, daß man im 
Terminalmodus auf dem eigenen Bild¬ 
schirm nur das sieht, was der entfernte 
Rechner zurückschickt. Gut für das 
Arbeiten mit zeichenorientierten 
“wirklichen Programmen“ am entfern¬ 
ten Rechner; wenn beide Kermits im 
CONNECT-Modus laufen, tippt man 
blind (dann ON wählen). 

SET PARITY < Art> 

Beide Kermits bieten vier verschiedene 
Arten von Paritätsprüfung (byteweise) 
oder “keine Prüfung“ an. Wichtig ist 
nur, daß die Einstellung an beiden 
Rechnern übereinstimmt. 

SET PORT < Nummer > 

Auswahl des benutzten Kommunika¬ 
tionsports; auf JOYCE nicht sinnvoll, 
kann auf dem PC aber hilfreich sein, 
zum Beispiel, wenn an der ersten se¬ 
riellen Schnittstelle schon eine Maus 
hängt. 

SET PRINTER COPY [ON,OFF] 
Mitlaufcnlassen des Druckers 
SET SPEED < Baudrate > 

Synonym für SET BAUD 
SET TIMER [ON,OFF] 
Timeoutfunktion an/abschalten: Ein¬ 
stellen, ob Kermit das Warten auf eine 
fehlerfreie Übertragung nach einer be¬ 
stimmten Zeit aufgeben soll oder nicht. 
SET PACKET-LENGTH < Zahl > 
Anzahl Zeichen, die Kermit als zusam¬ 
menhängendes Paket sendet. Von der 
CP/M-Version aus sind aber zirka 94, 
nur feste Zeichen möglich. 

Hinweise und Besonderheiten 

Wenn Sie den PC-Kermit nach dem Sy¬ 
stemstart zum ersten Mal mit Hilfe der 
Batchdatei aufrufen, beachten Sie bitte, 
daß das verwendete DOS-Kommando 
MODE ein Programm mit einem spei¬ 
cherresidenten Teil ist, der sich beim 
ersten Aufruf installiert. Der erste Auf¬ 
ruf dieser Batchdatei muß deshalb aus 
der “ursprünglichen“ DOS-Komman- 
dozeile heraus erfolgen, nicht aus der 



IOCR 

Intelligent Optlcal Character Recognifion 

Sie brauchen den Text, den Vertrag, 
die Tabelle in Ihrem Computer. Sofort 
Abtippen ist lästig und teuer - und Sie 
haben keine Zeit dazu. Was tun? 
Überlassen Sie es Ihrem Computer 
(PC/AT: 640K, oder Macintosh: 2MB), 
Ihrem Scanner und: 

’^P^KEAdSTAir 

■ EX»PRESS- vollautomatisch, 
Omnifont, deutsch und multilingual; 

■ 2 PLUS - lernfähig, schnell und 
treffsicher; 

■ 3 PLUS - lernfähig, intelligent und 
komfortabel; 

■ 6 - Omnifont UND lernfähig: 

Mit ReadStar setzt lOCR-Spezialist 
INOVATIC® Maßstäbe: 

Kontrollierte Texterfassung, schnell, 
treffsicher, flexibel, komfortabel, 
benutzerfreundlich: ReadStar sichert 
Ihren Vorsprung. 

ReadStar bezieht Ihr Händler von: 

LEGENDA 

Informations-Systeme GmbH 
Nägeleseestr.8, D-7800 Freiburg 
Tel. 0761 / 701682+ 75173 
Fax 0761 / 701192 
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DOS-Option eines Editors und so wei¬ 
ter, um die Ordnung im Speicher nicht 
durcheinanderzubringen. 

Kermit erlaubt in Dateinamen gewisse 
Sonderzeichen nicht, auch wenn das 
Betriebssystem nichts gegen sie einzu¬ 
wenden hat. Keinen Ärger gibt es mit 
Buchstaben, Ziffern und dem Amper¬ 
sand (&). 

FINISH von JOYCE aus beendet den 
SERVER-Modus auf dem PC; BYE 
beendet sogar PC-Kermit selbst, so daß 
der PC wieder im Betriebssystem lan¬ 
det! Beides kann man jedoch auf dem 
PC mit PC-Kermit-Optionen abstellen. 
Der JOYCE-Kermit selbst muß nach 
den Befehlen BYE und FINISH mit TC 
in den Kommandomodus zurückver¬ 
setzt werden, weil er von dem abgebro¬ 
chenen Server keine Quittung mehr 
empfängt. 

Test und Fehlerbehebung 

Die hier beschriebene JOYCE- 
PC-Kopplung sollte eigentlich mit je¬ 
dem JOYCE und jedem PC auf Anhieb 


funktionieren. Wenn es trotzdem Pro¬ 
bleme gibt, gehen Sic wie folgt vor: 
Wenn Sie nicht sicher sind, ob die Ver¬ 
bindung zwischen den Rechnern über¬ 
haupt funktioniert, lassen Sie die bei¬ 
den KERMITs sich “langsam“ unter¬ 
halten: Geben Sie auf beiden(!) Rech¬ 
nern jeweils aus dem KERMIT-Grund- 
menü beziehungsweise -Kommando¬ 
zeile ein: 

CONNECT 

und tippen Sie dann irgendetwas Harm¬ 
loses auf der Tastatur. Das, was Sie tip¬ 
pen, müßte unmittelbar auf dem Bild¬ 
schirm des jeweils anderen Rechners 
zu sehen sein. (Auf dem Rechner, auf 
dem Sie selbst tippen, sehen Sie nur et¬ 
was, falls Sie das lokale “Echo“ einge¬ 
schaltet haben.) 

Wenn die Übertragung mit Kermit 
nicht ordentlich funktioniert, sollten 
Sie zunächst mit DEVICE.COM die 
Einstellung der logischen Geräte über¬ 
prüfen. Vor allem in der Anfangsphase 
mit Kermit passiert es nämlich leicht, 
daß man auf eine Systemmeldung “... 
nicht bereit ...“ mit “Abbrechen“ ant¬ 


wortet, wodurch CP/M das AUXOUT 
Device, das Kermit benutzt, auf NULL 
setzt. Ein Ncustart der SUBMIT-Datei 
KERMITxx.SUB behebt diesen Fehler. 
Weiter sollten Sie auf beiden Rechnern 
die Übeitragungsparameter auf Über¬ 
einstimmung prüfen. Wenn das nichts 
hilft, haben Sie vielleicht einen Device- 
Treiber auf dem PC vergessen, der die 
Schnittstelle belegt; um das festzustel¬ 
len, hilft ein Blick in die Datei CON¬ 
FIG.SYS und in die TSR-Tabelle. 
Wenn auch das Kabel in Ordnung ist, 
sollten Sie im Zweifelsfall die Baudrate 
drastisch herabsetzen und den Test mit 
CONNECT wiederholen. Spätestens 
dann müßte sich auch in hartnäckigen 
Fällen ein Erfolg einstellen. 

Das Schnittstellenkabel 

Einen Schaltplan für ein Null-Mo- 
dem-Kabel finden Sie in der Dokumen¬ 
tation der JOYCE-SIO CPS 8256. Sie 
können ein solches Kabel aber auch 
fertig kaufen. 

(Christian Frederking/rs) 


Softwareautoren für die Amstrad-Computer gesucht. 

Haben Sie nicht auch schon einmal daran gedacht, ein gutes Programm, das Sie selbst geschrieben haben, zu 
veröffentlichen? 

Warum sollten nicht auch andere Leser in den Genuß Ihrer Mini-Dateiverwaltung, Grafikerweiterung, Tips, 

Tricks, Tools, Utilities, Simulationen, Games usw. kommen? 

Wirklich gute Software, die den Anforderungen unserer Leser genügt, wird von uns entsprechend honoriert. 

Sie sollten jedoch bei der Einsendung Ihres Programms ein paar Punkte beachten. 

Wenn Sie Nachstehendes befolgen, wird Ihre Post zügig und ohne große Rückfragen und Verzögerungen bear¬ 
beitet: 

Senden Sie uns Ihr Programm mit 

(a) allen benötigten Files auf der mit dem Programmnamen bezeichneten Diskette, 

(b) den kompletten Ausdrucken/Listings aller Files der Diskette, 

(c) einer Beschreibung Ihres Programms und 

(d) einer genauen Bedienungsanleitung. 

Die Bedienungsanleitung und die Beschreibung sollten als Textdatei mit auf der Programm-Diskette enthalten 
sein. Wichtig für uns zu wissen wäre noch, mit welcher Konfiguration Sie arbeiten, welchen Drucker Sie benut¬ 
zen, ob Sie ein zweites Laufwerk angeschlossen haben usw. 

Wenn Sie der Meinung sind, ein solches Programm geschrieben zu haben, dann nichts wie einschicken an den 

DMV-Verlag ■ Red. PC International ■ Abtlg. CPC/Joyce/PC 
Postfach 250 ■ 3440 Eschwege 

Geben Sie bitte in der Adresse die für Ihren Amstrad-Computer (CPC, Joyce, PC) zuständige Abteilung mit an, 
damit Ihr Programm direkt in die richtigen Hände gelangt. 


80 PC 11 ’89 












: 



\\\ 

®A\ 




Ein Abonnement 
ist praktisch und gewährt 
zusätzlich noch Preisvorteile. 

PC Amstrad International kostet im Abonne ment: 

Im Inland bzw. West-Berlin: 6 Ausg. = 33,- OM 

12 Ausg. = 66,- DM 

Im europäischen Ausland: 6 Ausg. = 48,- DM 

12 Ausg. = 96,- DM 

Im außereuropäischen Ausland: 6 Ausg. = 60,- DM 

12 Ausg. = 120,- DM 

% 




Widerrufsrecht: 

Jeder Abonnent hat das 
Recht, seine Bestellung 
innerhalb einer Woche 
beim DMV-Verlag, Post¬ 
fach 250, 3440 Eschwe- 
ge schriftlich zu widerru¬ 
fen. Die rechtzeitige Ab¬ 
sendung des Widerruf¬ 
schreibens genügt zur 
Fristwahrung. 
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Unterlagen-Datei: 

Ordnungshilfe für persönliche Daten 

Nicht erst seit kurzer Zeit hat die Bürokratie auch im eigenen Haushalt 
überhandgenommen. Stapel von Versicherungspolicen, in die sich Mengen 
von Bankauszügen heimtückisch eingeschlichen haben, lagern zwischen 
Steuerbescheiden, Hypotheksbriefen und Lohnauszügen. Die Hälfte des 
spärlichen Gehaltes wird da schon mal für die Anschaffung von Aktenord¬ 
nern, Karteireitern und Lochrandverstärkern verbraucht, und dennoch 
hält die Ordnung keinen Einzug. 


Glücklich ist da derjenige, der sich 
stolzer Besitzer eines Computers nen¬ 
nen kann. Noch glücklicher kann sich 
der nennen, der außer einem Rechner 
das Programm Unterlagen-Datei be¬ 
sitzt, denn es bringt Ordnung in den 
heimischen Papierberg. Es handelt sich 
dabei um eine Indexdatei zum Spei¬ 
chern persönlicher Daten in den Berei¬ 


chen Versicherung, Bank, Arbeit, Pkw 
und Wohnung. Man kann mit diesem 
Programm Daten eingeben, ausgeben, 
ändern, löschen und ausdrucken. 

Zum Speichern der Daten steht für je¬ 
den Bereich ein sogenannter Ordner, 
mit einer Speicherkapazität von 8 Sei¬ 
ten, und 14 Zeilen zu je 70 Zeichen zur 
Verfügung. 



Die Seiten können dank einer konse¬ 
quenten Anwendung des Inkey-Befehls 
anstelle der Input-Anweisung bequem 
beschrieben und editiert werden. 

Das Programm ist per Paßwort ge¬ 
schützt. Dieses heißt ’ordner’; man 
kann es allerdings jederzeit durch eine 
kleine Programmänderung in Zeile 
1014 ändern. Ist das richtige Wort ein¬ 
gegeben, erscheint das Menü. Gleich¬ 
zeitig prüft das Programm, ob schon 
eine Datei existiert, die Ihre Daten ent¬ 
hält. Wenn nein, wird eine neue ange¬ 
legt und geöffnet. 

Die Bedienungsanweisung, die ein fe¬ 
ster Bestandteil des Programms ist, 
kann jederzeit durch Drücken der Taste 
(H) vom Menü aus abgerufen und am 
Bildschirm angezeigt werden. Eine 
durchdachte und gut kommentierte Be¬ 
dienerführung macht die Arbeit mit 
diesem Programm kinderleicht, so daß 
der Unordnung keine Chance gelassen 
wird. 

(Helmut Geissler/jf) 


1000 REM . Unterlagen - Oat 

ei . 

1001 REM . von Helmut Geissler 


1989 . 

1002 

1003 

1004 CLS 

1005 GOSUB aufbau 

1006 BOX 2200;2650,3850,430 FILL WITH 8 COLOR 14 

1007 BOX 2200;2650,3850,430 

1008 PRINT AT(25;10);"Bitte Passwort eingeben:" 

1009 SET COLOR(14) 

1010 REPEAT 

1011 WINDOW CURSOR ON 

1012 GRAPHICS CURSOR 2 

1013 LINE INPUT AT(50;10);"",cnam$ 

1014 UNTIL cnam$="ordne r" 

1015 WINDOW CURSOR OFF 

1016 BOX 2200;2650,3850,430 FILL WITH 8 COLOR 8 

1017 SET COLOR(1) 

1018 GOSUB pruef 

1019 

1020 

1021 LABEL menue 

1022 WINDOW TITLE"Menue. . . " 

1023 GOSUB wert 

1024 GOSUB bi idle 

1025 GOSUB box 1 

1026 GOSUB box2a 

1027 GOSUB box3a 

1028 GOSUB bOx4a 

1029 GOSUB bOX5a 

1030 GOSUB textl 

1031 

1032 

1033 LABEL bl 

1034 GOSUB z2 

1035 GOSUB Zljoe 

1036 LABEL tal 

1037 n1=INKEY 

1038 IF n1=336 THEN y=yl:GOSUB box_loe:GOSUB box 
1a:GOTO b2 

1039 IF n1=335 THEN GOTO ende 

1040 IF nl=72 OR nl=104 THEN GOTO hinweisl 

1041 IF n1 = 68 OR nl = 100 THEN GOTO dru_cken 

1042 t$="v“ 
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1043 v = ASC("V“ ) 

1Ö44 v1=ASC("V") 

1045 IF n 1 = v OR nl = vl THEN GOTO Versicherung 

1046 GOTO tal 

1047 

1048 

1049 LABEL b2 

1050 GOSUB box 2 

1051 GOSUB zl 

1052 LABEL ta2 

1053 n2=INKEY 

1054 IF n2=336 THEN y=y2:GOSUB box_loe:GOSUB box 
2a:GOTO b3 

1055 IF n 2 = 328 THEN y = y2:GOSUB box_1oe:GOSUB box 
2a:GOSUB z1_1oe:GOSUB boxl:GOTO bl 

1056 IF n2=335 THEN GOTO ende 

1057 IF n2=72 OR n2=104 THEN GOTO hinweisl 

1058 IF n2 = 68 OR n2=100 THEN GOTO drucken 

1059 t$="b“ 

1060 b=ASC("b") 

1061 b1=ASC("B“) 

1062 IF n2=b OR n2=bl THEN GOTO ba_nk 

1063 GOTO ta2 

1064 

1065 

1066 LABEL b3 

1067 GOSUB box3 

1068 LABEL ta3 

1069 n3=INKEY 

1070 IF n3=336 THEN y=y3:GOSUB bOx_loe:GOSUB box 
3a:GOTO b4 

1071 IF n3=328 THEN y=y3:GOSUB box_loe:GOSUB box 
3a:GOTO b2 

1072 IF n3=335 THEN GOTO ende 

1073 IF n3= 7 2 OR n3=104 THEN GOTO hinweisl 

1074 IF n3=68 OR n3=100 THEN GOTO dru_cken 

1075 t$="a" 

1076 a=ASC("a") 

1077 a1=ASC("A") 

1078 IF n3=a OR n3=al THEN GOTO ar_be1t 

1079 GOTO ta3 

1080 
1081 

1082 LABEL b4 

1083 GOSUB box4 
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1084 LABEL ta4 

1085 n4=INKEY 

1086 IF n4=336 THEN y=y4:G0SUB box_loe:GOSUB box 
4a:GOSUB z2_loe:GOTO b5 

1087 IF n4=328 THEN y=y4:GOSUB box_loe:GOSUB box 
4a:GOTO b3 

1088 IF n4=335 THEN GOTO ende 

1089 IF n4= 72 OR n4=104 THEN GOTO hinweisl 

1090 IF n4=68 OR n4=100 THEN GOTO dru_cken 

1091 t$="p" 

1092 p=ASC("p") 

1093 pl=ASC("P") 

1094 IF n4=p OR n4=pl THEN GOTO au_tO 

1095 GOTO ta4 

1096 

1097 

1098 LABEL b5 

1099 GOSUB bOx5 

1100 LABEL ta5 

1101 n5=INKEY 

1102 IF n5=328 THEN y=y5:GOSUB box_loe:GOSUB box 
5a:GOSUB z2:G0T0 b4 

1103 IF n5=335 THEN GOTO ende 

1104 IF n5= 72 OR n5=104 THEN GOTO hinweisl 

1105 IF n5 = 68 OR n5=100 THEN GOTO dru_cken 

1106 t$="w" 

1107 w=ASC("w") 

1108 wl=ASC("W") 

1109 IF n5 = w OR n5 = wl THEN GOTO woh_nung 

1110 GOTO ta5 

1111 
1112 

1113 LABEL zw1_menue 

1114 CLS #1:GOSUB bi1d1:GOTO menue 

1115 

1116 

1117 LABEL ende 

1118 CLOSE #date1 

1119 END 

1120 
1121 
1122 

1123 LABEL ver_sicherung 

1124 WINDOW TITLE"Versicherungs - Unterlagen... 

1125 GOSUB bi 1d2_neu 

1126 t$="v" 

1127 LABEL ta6 

1128 t6=INKEY 

1129 IF 16 = 77 OR t6=109 THEN GOTO zw1_menue 

1130 IF t6=69 OR t6=101 THEN GOSUB e1n_gabe 

1131 IF 16 = 65 OR t6 = 9 7 THEN GOTO aus_gabe 

1132 GOTO ta6 

1133 

1134 

1135 LABEL ba_nk 

1136 WINDOW TITLE"Bank - Unterlagen..." 

1137 GOSUB bi 1d2_neu 

1138 t$="b" 

1139 LABEL ta7 

1140 t7=INKEY 

1141 IF 17= 77 OR 17=109 THEN GOTO zwi_menue 

1142 IF 17= 69 OR t7=101 THEN GOSUB ein_gabe 

1143 IF 17 = 65 OR t7 = 97 THEN GOTO aus_gabe 

1144 GOTO ta 7 

1145 

1146 

1147 LABEL ar_beit 

1148 WINDOW TITLE"Arbeits - Unterlagen..." 

1149 GOSUB bi1d2_neu 

1150 t$="a" 

1151 LABEL ta8 

1152 t8=INKEY 

1153 IF t8= 77 OR t8=109 THEN GOTO zwi_menue 

1154 IF 18= 69 OR t8=101 THEN GOSUB ein_gabe 

1155 IF t8=65 OR t8 = 9 7 THEN GOTO aus_gabe 

1156 GOTO ta8 

1157 

1158 

1159 LABEL au_tO 

1160 WINDOW TITLE"Auto - Unterlagen..." 

1161 GOSUB bi 1d2_neu 

1162 t$="p" 

1163 LABEL ta9 

1164 t9=INKEY 

1165 IF t9 = 77 OR t9 = 109 THEN GOTO zwi menue 
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1166 IF t9= 69 OR t9=101 THEN GOSUB ein_gabe 

1167 IF 19 = 65 OR t9 = 97 THEN GOTO aus_gabe 

1168 GOTO ta9 

1169 

1170 

1171 LABEL woh_nung 

1172 WINDOW TITLE"Wohnungs - Unterlagen..." 

1173 GOSUB bi 1d2_neu 

1174 t$="w" 

1175 LABEL talO 

1176 t10=INKEY 

1177 IF 110= 7 7 OR tl0=109 THEN GOTO zwi_menue 

1178 IF 110= 69 OR tl0=101 THEN GOSUB ein_gabe 

1179 IF 110= 65 OR tlO=97 THEN ÖOTO aus_gabe 

1180 GOTO talO 

1181 
1182 

1183 LABEL aus_gabe 

1184 SET MODE(2) 

1185 WINDOW TITLE"Ausgabe..." 

1186 GOSUB text2a 

1187 LINE 600;4500,600;4830 WIDTH 3 

1188 LINE 6900;4500,6900;4830 WIDTH 3 

1189 SET MODE(2) 

1190 PRINT AT(3;2);"Nr." 

1191 GOSUB text_a1oe 

1192 GOSUB hinweis 

1193 bl=1 

1194 PRINT AT(70;2);"Blatt:";bl 

1195 ind=l 

1196 PRINT 

1197 POSITION #datei KEY t$ INDEX ind 

1198 WHILE LEFT$(KEY$(#datei),LEN(t$))=t$ 

1199 GET kdatei,p$ 

1200 IF VPOS( # 1) = 1 8 THEN GOTO halt 

1201 LABEL wei_ter 

1202 PRINT TAB(3)p$.p.typ${4 TO} TAB(8)p$.p.text 

1203 POSITION #datei,NEXT 

1204 WEND 

1205 MOVE 5000;600:PRINT COLOR(14);"Blättern...( 
B)" 

1206 MOVE 5000;600:PRINT "Ausgabe...(A)" 

1207 LABEL tall 

1208 tll=INKEY 

1209 IF 111 = 69 OR tll=101 THEN GOSUB bildlb_loe: 
GOSUB bi 1d2c:GOTO e1n_gabe 

1210 IF 111 = 6 5 OR 111 = 9 7 THEN GOSUB bildlb_loe:G 
OTO aus_gabe 

1211 IF tl1=142 OR t11=132 THEN ae=l:GOTO aen_de 
rung 

1212 IF 111 = 76 OR 111 = 108 THEN ae = 2:GOTO aenjer 
ung 

1213 IF 111= 7 7 OR 111 = 109 THEN GOTO zwi_menue 

1214 GOTO tall 

1215 

1216 

1217 LABEL halt 

1218 MOVE 5000;600:PRINT COLOR(0B1ättern...(B 

) 

1219 LABEL tal2 

1220 tl2=INKEY 

1221 IF 112 = 60 OR tl2 = 101 THEN GOSUB bildlb_loe: 
GOSUB bi 1d2c:GOTO ein_gabe 

1222 IF t12=66 OR tl2=98 THEN GOSUB bildlb_loe: 
GOSUB b1_z:PRINT AT(3;3)"":GOTO wei_ter 

1223 IF 112=142 OR tl2 = 132 THEN ae=1:GOTO aen_de 
rung 

1224 IF 112= 76 OR tl2=108 THEN ae = 2:GOTO aenjer 
ung 

1225 IF 112= 7 7 OR tl2=109 THEN GOTO zwi_menue 

1226 GOTO ta12 

1227 

1228 

1229 LABEL bl_z 

1230 PRINT AT(7 6;2) C0L0R(14);bl 

1231 bl=bl+1 

1232 PRINT AT(70;2);"Blatt:";bl 

1233 RETURN 

1234 

1235 

1236 LABEL ein_gabe 

1237 WINDOW TITLE”Bitte warten bis Eingabemaske 
e rscheint...” 


Listing UDATEI 


Listing UDATEI 
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1238 GOSUB bl 1d2b 1oe 


1313 GOSUB text8 

1239 GOSUB e num 


1314 LABEL tal3 

1240 LABEL zwi ein 


1315 c3=INKEY 

1241 WINDOW TITLE"Bitte warten bis Eingabemaske 


1316 IF c3=13 THEN code = c3:RETURN 

erscheint" 


1317 IF c3=32 7 THEN GOTO zw1_menue 

1242 GOSUB bi 1d2c 


1318 GOTO ta13 

1243 GOSUB hin weis 


1319 

1244 GOSUB text3 


1320 

1245 GOSUB blldla 


1321 LABEL ein 

1246 MOVE 700;4340:PRINT COLOR(0 ) ;STRING$(70, " ." 


1322 a$(n)=w1$ 

) 


1323 RETURN 

1247 WINDOW TITLE"Eingabe..." 


1324 

1248 n=0 


1325 

1249 GOSUB neu num 


1326 LABEL zwi speich 

1250 IF VAL(nummer$)>1115 THEN WINDOW TITLE"Acht 


1327 FOR n=1 TO n 

ung: Mit Nummer...112 ist Ihr Ordner voll! 


1328 GOSUB speichernl 

" 


1329 NEXT 

1251 IF VAL(numme r$)>1112 THEN GOSUB text9:FOR t 


1330 RETURN 

=1 TO 10000:NEXT:GOTO zwi menue 


1331 

1252 REPEAT 


1332 

1253 GOSUB numl 


1333 LABEL speichernl 

1254 GOSUB text ein 


1334 GOSUB neu num 

1255 GOSUB ein 


1335 text$=a$(n) 

1256 UNTIL n <1 OR n>14 OR code=13 


1336 LABEL spe1chern2 

1257 WINDOW TITLE"Bitte warten.... Daten werden 


1337 p$=STRING$(76,0) 

gespeichert" 


1338 p$.p.typ$=t$+nummer$ 

1258 GOSUB zwi speich 


1339 p$.p.text$=a$(n) 

1259 C LS 


1340 CONSOLIDAT E #datei 

1260 GOSUB bl 1 dl 


1341 ADDREC Kdatel,p$ KEY p$.p.typ$ INDEX typind 

1261 GOSUB bi 1d2b 


ex 

1262 GOSUB zwi ein 


1342 a$(n)=" " 

1263 RETURN 


1343 RETURN 

1264 


1344 

1265 


1345 

1266 LABEL numl 


1346 LABEL e num 

1267 n=n+1 


1347 1nd=1 

1268 n nr=VAL(nummer${3 TO }) 


1348 POSITION ttdate1 KEY t$ INDEX 1nd 

1269 1 n r = n nr-1 


1349 WHILE LEFT$(KEY$(#date1),LEN(t$))=t$ 

1270 neu nr=l nr+n 


1350 GET #datei,p$ 

1271 PRINT AT(2;3+n);neu nr 


1351 POSITION ttdatel,NEXT 

1272 RETURN 


1352 WEND 

1273 


1353 RETURN 

1274 


1354 

1275 LABEL text ein 


1355 

1276 x=8 


1356 LABEL neu num 

1277 wl$="" 


1357 numl=VAL(p$.p.typ${2 TO)) 

1278 REPEAT 


1358 num2=numl+l 

1279 REPEAT 


1359 nummer$=STR$(num2) 

1280 code=INKEY 


1360 RETURN 

1281 UNTIL code<>-l 


1361 

1282 IF Code >255 OR code <31 THEN GOTO sonderta 


1362 

st 


1363 LABEL aen derung 

1283 w2$=CHR$(code) 


1364 IF ae=1 THEN WINDOW TITLE"Daten ändern..." 

1284 PRINT AT(x;n+3);w2$ 


1365 IF ae=2 THEN WINDOW TITLE"Daten löschen..." 

1285 x=x+l 


1366 GOSUB bi 1d2b 

1286 GOSUB pruefl 


1367 IF ae=l THEN GOSUB text4 

1287 wl$=wl$+w2$ 


1368 IF ae=2 THEN GOSUB text7 

1288 GOTO weiter 


1369 LABEL n_ae 

1289 LABEL sondertast 


1370 REPEAT 

1290 IF code=13 THEN GOTO weiter 


1371 SET COLOR(O) 

1291 IF cod e = 8 OR code = 331 THEN wl$=wl${TO -2}:P 


1372 MOVE 6650;600:INPUT ;"",ae n 

RINT CHR$(127) :x = x-l : IF x<8 THEN x = 8 


1373 GOSUB pruef3 

1292 IF code=336 THEN PRINT CHR$(7):GOSUB pruef 


1374 UNTIL C=1 

2: RETURN 


1375 ae_n r = ae_n+1000 

1293 IF C0de = 32 7 THEN GOTO zwi menue 


1376 numm$=STR$(ae nr) 

1294 LABEL weiter 


1377 tl$=t$+numm$ 

1295 UNTIL code=13 


1378 SET COLOR(l) 

1296 RETURN 


1379 wähl=1 

1297 


1380 GOTO tex su 

1298 


1381 LABEL w ae 

1299 LABEL pruefl 


1382 GOSUB bi 1d2 b 

1300 IF x= 78 THEN PRINT CHR$(7) 


1383 IF ae=1 THEN GOSUB text5 

1301 IF x > 78 THEN PRINT CHR$(127) 


1384 IF ae=2 THEN GOSUB text7a 

1302 IF x = 79 THEN x=78 


1385 SET MODE(1) 

1303 RETURN 


1386 GOSUB aend t 

1304 


1387 textl$=wl$ 

1305 


1388 SET MODE(2) 

1306 LABEL pruef2 


1389 IF c=13 AND ae = 2 THEN PRINT AT(8;y) COLOR(8 

1307 IF neu nr=>112 THEN GOSUB ord voll:RETURN 


)p$.p.text$:GOSUB dat_aend:GOTO nochmal_aen 

1308 IF x = 2 OR n >13 THEN n=13 


d 

1309 RETURN 


1390 IF c=13 THEN GOSUB dat aend:GOTO nochmal ae 

1310 


nd 

1311 


1391 IF c = 32 7 THEN GOSUB bild2 neu:GOTO aus_gabe 

1312 LABEL ord_vol 1 


1392 

Llsting UDATEI 


Llsting UDATEI 
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1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 
142 7 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

1456 
145 7 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 


LABEL pruef3 

IF ae_n >112 THEN GOSUB fa1 sch:RETURN 

IF a e_n > 0 AND ae_n <15 AND b1=1 THEN c=l 

IF ae_n >14 AND ae_n<29 AND bl=2 THEN c=l 

IF ae_n >28 AND ae_n<43 AND bl=3 THEN c=l 

IF ae_n>42 AND ae_n<57 AND bl=4 THEN c=l 

IF ae_n >56 AND ae_n<71 AND bl=5 THEN c=l 

IF ae_n >70 AND ae_n<85 AND b1=6 THEN c=l 

IF äe_n >84 AND ae_n<99 AND bl = 7 THEN c=l 

IF ae_n >98 AND ae_n<113 AND b1=8 THEN c=l 
IF c< >1 THEN GOSUB falsch 
RETURN 


LABEL falsch 

MOVE 6540;600:PRINT COLOR(14);ae_n 
PRINT CHR$(7) 

MOVE 7300;600:PRINT COLOR(0);"fa1 sch" 
FOR t=l TO 2000:NEXT 

MOVE 7300;600:PRINT COLOR(14);"fa1 sch 
RETURN 


LABEL dat_aend 
altp$=p$ 
p$ = ST RING$(76,0) 
p$.p.typ$=tl$ 
p$.p.text$=textl$ 

CONSOLI DATE «datei 

ADDREC ltdate i , p$ KEY p$.p.typ$ INDEX typind 
ex 

neu pos111on$ = POSITION$(«datei ) 

POSITION «datei KEY altp$.p.typ$ INDEX typl 
ndex 

DELKEY «datei 

POSITION «datei AT neuposition$ 

RETURN 


LABEL nochmal_aend 
GOSUB bi 1d2b 

MOVE 900;600:PRINT "Soll noch ein Sätz geän 
dert werden":MOVE 4400;600:PRINT "..J/N" 
LABEL tal4 
tl4=INKEY 

IF 114= 74 OR 114=106 THEN GOSUB text4a:SET 
MODE(2):GOTO n_ae 

IF 114= 78 OR 114 = 110 THEN GOSUB bild2_neu:G 
OTO aus_gabe 
GOTO ta14 


LABEL aend_t 

X= 8 

wl$="" 

REPEAT 
REPEAT 
C=INKEY 
UNTIL CO-1 

IF c >255 OR c <31 THEN GOTO s_tast 
w2$=CHR$(c) 

PRINT AT(x;y);w2$ 
x = x+l 

GOSUB pruefl 
wl$=wl$+w 2 $ 

GOTO w 

LABEL s_tast 

IF C= 13 THEN GOTO w 

IF c = 8 OR c = 331 THEN wl$ = wl${TO -2}:PRINT C 

HR$(127):x=x-l:IF x<8 THEN x=8 

IF C = 32 7 THEN RETURN 

LABEL w 

UNTIL c=13 

RETURN 


LABEL t e x_s u 
i nd=l 

POSITION «datei KEY tl$ INOEX ind 
WHILE LEFT$(KEY$(«datei),LEN(tl$))=tl$ 
GET «datei,p$ 

POSITION «datei.NEXT 
WEND 


1471 

1472 

1473 

1474 


1475 

1476 


1477 

1478 


1479 

1480 


1481 

1482 


1483 

1484 


1485 

1486 


1487 

1488 


1489 

1490 


1491 

1492 


1493 

1494 


1495 

1496 


1497 

1498 


1499 

1500 


num$=p$.p.typ${2 TO) 
po_n r = VAL(num$) 

IF ae_n r < > po_n r THEN GOSUB falsch:IF wahl = l 
THEN GOTO n_ae 

IF po_n r=1001 OR po_nr = 1015 OR po_nr = 1029 0 
R po_n r = 1043 OR po_nr = 1057 OR po_nr=1071 OR 
po_nr=1085 OR po_nr=1099 THEN y=4:G0T0 p_n 


IF po_nr=1002 OR po_nr=1016 OR po_nr=1030 O 
R po_n r=1044 OR po_nr=1058 OR po_nr=1072 OR 
po_n r=1086 OR po_nr=1100 THEN y = 5:G0T0 p_n 


IF po_nr=1003 OR po_nr=1017 OR po_nr=1031 0 
R po_n r=1045 OR po_nr=1059 OR po_nr=1073 OR 
po_nr=1087 OR po_n r=1101 THEN y=6:G0T0 p_n 


IF po_nr=1004 OR po_nr=1018 OR po_nr=1032 O 

R po_n r=1046 OR po_nr = 1060 OR po_nr = 1074 OR 
po_n r=1088 OR po_nr=1102 THEN y=7:GOTO p_n 


IF po_n r=1005 OR po_nr=1019 OR po_nr=1033 O 
R po_n r=104 7 OR po_nr=1061 OR po_nr=1075 OR 
P°_n r = 1089 OR po_nr = 1103 THEN y = 8:G0T0 p_n 


IF po_n r=100 6 OR po_nr=1020 OR po_nr=1034 0 
R po_n r=1048 OR po_nr=1062 OR po_nr=1076 OR 
P°_ n r = 109 0 OR po_nr=1104 THEN y = 9:GOTO p_n 


IF po_nr=1007 OR po_nr=1021 OR po_nr=1035 0 
R po_nr=1049 OR po_nr=1063 OR po_nr=1077 OR 
P°_ n r=1091 OR po_nr=1105 THEN y=10:GOTO p 
n r 

IF po_nr=1008 OR po_nr=1022 OR po_nr=1036 0 
R po_nr=1050 OR po_nr=1064 OR po_nr=1078 OR 
po_nr=1092 OR po_nr=1106 THEN y=ll:GOTO p 
n r — 

IF pO_n r=1009 OR po_nr=1023 OR po_nr=1037 0 
R po_nr=1051 OR po_nr=1065 OR po_nr=1079 OR 
po_nr=1093 OR po_nr=1107 THEN y=12:G0T0 p 
n r 

IF po_n r=1010 OR po_nr=1024 OR po_nr=1038 O 
R po_n r=1052 OR po_nr=1066 OR po_nr = 1080 OR 
po_nr = 1094 OR po_n r = 1108 THEN y=13:GOTO p 
n r ~ 

IF po_n r = 1011 OR po_n r=1025 OR po_nr=1039 O 
R po_n r = 1053 OR po_nr=1067 OR po_nr=1081 OR 
po_nr=109 5 OR po_n r = 1109 THEN y=14:G0T0 p 
n r 

IF po_n r=1012 OR po_nr=1026 OR po_nr = 1040 0 
R po_n r = 1054 OR po_nr=1068 OR po_nr=1082 OR 
po_nr=1096 OR po_nr=1110 THEN y=15:G0T0 p 
n r — 

IF po_n r=1013 OR po_nr=1027 OR po_nr=1041 O 
R po_n r = 10 5 5 OR po_nr=1069 OR po_nr=1083 OR 
po_n r=109 7 OR po_n r=1111 THEN y=16:G0T0 p_ 


IF po_nr=1014 OR po_nr=1028 OR po_nr=1042 0 
R po_nr=1056 OR po_nr=1070 OR po_nr=l084 OR 
po_nr=1098 OR po_nr=1112 THEN y=17:GOTO p 
n r 


1501 

1502 

1503 LABEL p_nr 

1504 PRINT AT(8;y) COLOR(14 ) ;p$.p.text$ 

1505 PRINT CHR$(7) 

1506 GOTO w_ae 

1507 

1508 

1509 LABEL ba_nk 

1510 GOSUB bi 1d2_neu 

1511 SET MODE(2) 


Llsting UDATEI 
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1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

1568 

1569 

1570 

1571 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 

1583 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 



PRINT AT(3;4);"Bank..." 

LABEL ta15 
tl5=INKEY 

IF tl5=77 OR tl5=109 THEN CLSrGOSUB b11dl:G 
OTO menue 
GOTO tal5 


LABEL ar_beit 
GOSUB b11d2_neu 
SET MODE(2) 

PRINT AT(3;3);"Arbeit..." 

LABEL ta16 
tl6=INKEY 

IF 116= 7 7 OR 116=109 THEN CLS:GOSUB bi1dl:G 
OTO menue 
GOTO ta16 


LABEL au_tO 

GOSUB bi 1d2_neu 
SET MODE(2) 

PRINT AT(3;3);"Auto ..." 

LABEL tal7 
tl7=INKEY 

IF tl7=77 OR t17=109 THEN CLS:GOSUB bildl:G 
OTO menue 
GOTO tal7 


LABEL woh_nung 
GOSUB bl 1d2_neu 
SET MODE(2) 

PRINT AT(3;3);"Wohnung..." 

LABEL tal8 
tl8=INKEY 

IF tl8=77 OR t18=109 THEN CLS:GOSUB bildlzG 
OTO menue 
GOTO ta18 


LABEL box 1 
GOSUB wert 
y=y1:GOSUB bol 

MOVE 450;3930:PRINT "Taste...(V)" 
LABEL boxla 
GOSUB wert 

y=yl:GOSUB bo2:GOSUB 11n 

MOVE 380;4260:PRINT "Versicherung 

RETURN 


LABEL bOx2 
GOSUB wert 
y=y2:GOSUB bol 

MOVE 450;3190:PRINT "Taste...(8)" 
LABEL box2a 
GOSUB wert 

y=y2:GOSUB bo2:GOSUB 11n 
MOVE 750;3500:PRINT "Bank” 

RETURN 


LABEL box3 
GOSUB wert 
y=y3:GOSUB bol 

MOVE 450;2460:PRINT "Taste ...(A)“ 
LABEL bOx3a 
GOSUB wert 

y=y3:GOSUB bo2:GOSUB lln 
MOVE 700;2760:PRINT "Arbeit" 
RETURN 


LABEL bOx4 
GOSUB wert 
y=y4:GOSUB bol 

MOVE 450;1720:PRINT "Taste...(P) 
LABEL box 4a 
GOSUB wert 

y=y4:GOSUB bo2:GOSUB lin 
MOVE 800;2020:PRINT "PKW" 

RETURN 


1592 



1593 

LABEL boxö 


1594 

GOSUB wert 


1595 

y=y5:GOSUB bol 


1596 

MOVE 450;980:PRINT "Taste... (W) 


1597 

LABEL box5a 


1598 

GOSUB wert 


1599 

y=y5:GOSUB bo2:y=y5-30:GOSUB lin 


1600 

MOVE 650;1290:PRINT "Wohnung" 


1601 

‘RETURN 


1602 



1603 



1604 

LABEL bOx_loe 


1605 

BOX x;y,1600.660 FILL WITH flae 

COLOR f 2 

1606 

RETURN 


1607 



1608 



1609 

LABEL bol 


1610 

BOX x;y,1600,660 FILL WITH flae 

COLOR fl 

1611 

RETURN 


1612 



1613 



1614 

LABEL bo2 


1615 

BOX x;y,1600,660 


1616 

RETURN 


1617 



1618 



1619 

LABEL lin 


1620 

LINE x+20;y+300,xb-20;y+300 WIOTH 3 COLOR 1 

1621 

RETURN 


1622 



1623 



1624 

LABEL z1 


1625 

LINE 500;450.500;750 END 1 WIDTH 

3 COLOR 1 

1626 

RETURN 


1627 



1628 



1629 

LABEL zl_1oe 


1630 

LINE 500;450,500;750 END 1 WIDTH 

3 COLOR 8 

1631 

RETURN 


1632 



1633 



1634 

LABEL Z 2 


1635 

LINE 1450;450,1450;750 START 1 WIDTH 3 COLO 


R 1 


1636 

RETURN 


1637 



1638 



1639 

LABEL z2 loe 


1640 

LINE 1450;450,1450;750 START 1 WIDTH 3 COLO 


R 8 


1641 

RETURN 


1642 



1643 



1644 

LABEL wert 


1645 

x=200:x b=1780 


1646 

yl=3870:y2=3130:y3=2410:y4=1660: 

y 5 = 9 40 

1647 

f1ae = 8 : f1 = 14:f2 = 8 


1648 

RETURN 


1649 



1650 



1651 

LABEL blldl 


1652 

SHAPE 0;0,0;250,8180;250,8180;0 

FILL WITH 8 


COLOR 1 


1653 

SHAPE 0;250,0;5000,8180;5000,8180;250 FILL 


WITH 8 COLOR 8 


1654 

RETURN 


1655 



1656 



1657 

LABEL bildla 


1658 

SET MODE(2) 


1659 

BOX 70; 1100,8000,3330 WIDTH 3 


1660 

LINE 600;4500,600;4830 WIDTH 3 


1661 

LINE 600;1100,600;4400 WIDTH 3 


1662 

PRINT AT(3;2);"Nr. 



(max 70 Zeich./14 Pos. 

ä=ae/ö=oe/ 


ü=ue) 


1663 

RETURN 


1664 



1665 



1666 

LABEL bl 1dlb 


1667 

SET MODE(2) 


1668 

BOX 70;1100,8000,3330 WIDTH 3 


1669 

RETURN 
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1670 


1752 

1671 


1753 

1672 LABEL blldlc 


1754 LABEL text2a 

1673 BOX 130;400,7900,450 FILL WITH 8 COLOR 14 


1755 MOVE 1800;600:PRINT "Ändern...(Ä)" 

1674 BOX 130:4580,7900,350 FILL WITH 8 COLOR 14 


1756 MOVE 3400;600:PRINT "Löschen. . . (L)" 

1675 BOX 120;400,7920,4560 WIDTH 3 


1757 RETURN 

1676 LINE 120;4580,8020;4580 WIDTH 3 


1758 

1677 LINE 120;850,8020:850 WIDTH 3 


1759 

1678 RETURN 


1760 LABEL text3 

1679 


1761 PRINT AT(3;19);"Eingabeabbrueh....(";COLOR( 

1680 


5) ;"Home";COLOR(1);")" 

1681 LABEL bi 1 dl 1oe 


1 762 PRINT AT(34; 19) ;"Nächste Zeile. ..( ) 

1682 BOX 0:250,8200,4700 FILL WITH 8 COLOR 8 


1763 LINE 5290;930,5290;730 END 1 COLOR 0 

1683 RETURN 


1764 PRINT AT(62;19);"Korrektur. .. ( )" 

1684 


1765 LINE 7600;830,7850;830 START 1 COLOR 0 

1685 


1766 PRINT AT(3;20);"Daten speichern...("jCOLOR 

1686 LABEL blldlb loe 


(0) ;"Enter”;COLOR(1);")" 

1687 BOX 150:1130,7780,3220 FILL WITH 8 COLOR 8 


1767 PRINT AT(28;20);".Daten können von jed 

1688 RETURN 


er Pos. aus gesp. werden" 

1689 


1768 RETURN 

1690 LABEL bl 1 die loe 


1769 

1691 BOX 150:920,7780,3600 FILL WITH 8 COLOR 8 


1770 

1692 RETURN 


1771 LABEL text4 

1693 


1772 MOVE 900;600: PRINT "Welcher Satz soll geä 

1694 


ndert werden. Nr.eingeben: ( ) “ 

1695 LABEL bild2 neu 


1773 RETURN 

1696 GOSUB bildl loe 


1774 

1697 GOSUB bi 1d2b 


1775 LA8EL text4a 

1698 GOSUB text2 


1776 MOVE 4400;600:PRINT COLOR(14);"..J/N" 

1699 GOSUB bi 1d2c 


1777 MOVE 4400;600:PRINT ". Nr.eingeben- ( 

1700 GOSUB bildlb 


)“ 

1701 RETURN 


1778 RETURN 

1702 


1779 

1703 


1780 

1704 LABEL bild2a 


1781 LABEL text5 

1705 BOX 200;400,1600,400 FILL WITH 8 COLOR 14 


1782 PRINT AT(3;19);"Daten ändern.(überschr 

1706 BOX 200;400,1600,400 


eiben ) " 

1707 RETURN 


1783 PRINT AT(43;19);"Geänderte Daten speichern. 

1708 


..(Enter )" 

1709 


1784 PRINT AT(3;20);"Keine Daten ändern Taste... 

1710 LABEL bi 1d2b 


(Home) " 

1711 BOX 70;400,8050,650 FILL WITH 8 COLOR 14 


1785 RETURN 

1712 BOX 70;400,8050,650 


1786 

1713 RETURN 


1787 

1714 


1788 LABEL text6 

1715 


1789 PRINT AT(3;19 ) C0L0R(14);"Daten ändern.. 

1716 LABEL bl 1d2b loe 


.(überschreiben)" 

1717 BOX 150;450,7850,550 FILL WITH 8 COLOR 14 


1790 PRINT AT(43;19) COLOR(14);"Geänderte Daten 

1718 RETURN 


spei ehern. . .(Ente r)" 

1719 


1791 PRINT AT(3;20) COLOR(14);"Keine Daten ander 

1720 


n Taste...(Home)" 

1721 LABEL b11d2c 


1792 MOVE 2400;600:PRINT "Geänderte Daten speich 

1722 BOX 50;4470,8030,430 FILL WITH 8 COLOR 14 


ern...J/N" 

1723 BOX 50:4470,8030,430 


1793 RETURN 

1724 RETURN 


1 794 

1725 


1795 

1726 


1796 LABEL text7 

1727 LABEL b11d2c_l0e 


1797 MOVE 900;600:PRINT "Welcher Zeile soll gelö 

1728 BOX 70;4550,8000,300 FILL WITH 8 COLOR 14 


seht werden. Nr.eingeben: ( )" 

1729 RETURN 


1798 RETURN 

1730 


1799 

1731 


1800 

1732 LABEL textl 


1801 LABEL text 7a 

1733 MOVE 450;4660:PRINT "Wählen Sie..." 


1802 MOVE 800;600:PRINT "Daten 1 Ösehen. . . Taste { E 

1734 MOVE 5900;4660:PRINT "Drucken...Taste(D) 


nter ) nicht löschen Taste...(Home) 

1735 


1803 RETURN 

1736 PRINT AT(8;20);"Taste" 


1804 

1737 PRINT AT(20;20);"Bedienhinweise...Taste(H)" 


1805 

1738 PRINT AT(49;20);"Datei schließen..,Taste(En 


1806 LABEL textS 

d)" 


1807 PRINT AT(8;17);"Der Ordner ist voll..Daten 

1739 RETURN 


speichern(Enter) oder Abbruch..Taste(Home) 

1740 



1741 


1808 RETURN 

1742 LABEL text2 


1809 

1743 MOVE 250;600:PRINT "Menue . . . (M)" 


1810 

1744 MOVE 5000;600:PRINT "Ausgabe...(A)" 


1811 LABEL text9 

1745 MOVE 6600;600:PRINT " E i n g a be . . . ( E j " 


1812 PRINT AT(20;9);"Der Ordner ist voll..." 

1746 RETURN 


1813 PRINT AT(20;11);"Neue Daten können nicht me 

1747 


hr gespeichert werden!" 

1748 


1814 RETURN 

1749 LABEL text aloe 


1815 

1750 MOVE 5000;600:PRINT COLOR(14);"Ausgabe. . . (A 


1816 

)" 


1817 LABEL hinweis 

1751 RETURN 


1818 IF t$="v" THEN PRINT AT(8;2);"0rdner(1) 



Versicherungs - Unterlagen_":RETU 



RN 
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1819 IF t$="b" THEN PRINT AT(8;2) ;"0rdner(2 ) 


1886 RECORD p;typ$ FIXED 6,text$ FIXED 70 

Bank - Unter 1agenRETURN 


1887 RETURN 

1820 IF t$="a" THEN PRINT AT(8;2);“Ordner(3) 


1888 

Arbeits - Unter1agenRETURN 


1689 

1821 IF t$="p" THEN PRINT AT(8;2);"0rdner(4) 


1890 LABEL hinweisl 

Auto - Unter1agenRETURN 


1891 MOVE 5900;4660:PRINT COLOR(14);"Drucken...T 

1822 IF t$="w" THEN PRINT AT(8;2);"0rdner(5 ) 


aste(D) 

Wohnungs - Unter1agenRETURN 


1892 GOSUB bildlc loe 

1823 RETURN 


1893 MOVE 450;4660:PRINT COLOR(14);"Wäh1en Sie.. 

1824 


.":MOVE 350;4660:PRINT "Unterlagen Datei: 

1825 


Hinweise und Bedienungsa 

1826 LABEL hin weis 


nweisung !" 

1827 IF t$="v" THEN PRINT ATI 8;2);"Versicherungs 


1894 DIM bedien$(55 ) 

- Daten eingebenRETURN 


1895 LABEL bed an 

1828 IF t$="b" THEN PRINT AT(8;2);"Bank - Daten 


1896 BOX 150;420,7850,400 FILL WITH 8 COLOR 14 

eingeben:":RETURN 


1897 GOSUB bildlc loe 

1829 IF t$="a" THEN PRINT AT(8;2);"Arbeits -*Oat 


1898 1=1 

en eingebenRETURN 


1899 LABEL lesen 

1830 IF t$="p“ THEN PRINT AT(8;2);"Auto - Daten 


1900 READ bedien$(i ) 

eingeben:":RETURN 


1901 IF i = 1 8 THEN REPEAT:UNTIL IN KEY$ <>"":GOSUB 

1831 IF t$="w" THEN PRINT AT(8;2>;"Wohnungs - Da 


bildlc loe 

ten eingebenRETURN 


1902 IF 1=33 THEN REPEAT:UNTIL INKEY$ <>"":GOSUB 

1832 RETURN 


bildlc loe 

1833 


1903 IF i=49 GOTO t wahl:GOSUB bildlc loe 

1834 


1904 IF i>0 THEN y=3 

1835 LABEL pruef 


1905 IF i>17 THEN y=-14 

1836 IF FIND$(padat$)="" OR FIND$(inpa$)="" THEN 


1906 IF i> 32 THEN y=-30 

GOSUB neu anlage 


1907 IF 1>48 THEN y=-46 

1837 CLOSE «tdatei 


1908 PRINT AT(4;1+y);bedien$(i) 

1838 OPEN #datei RANDOM padat$ INDEX inpa$ LENGT 


1909 i=i+1 

H 76 


1910 GOTO lesen 

1839 RETURN 


1911 

1840 


1912 DATA "Spei che rumfang:" 

1841 


1913 DATA "Die Datei besteht aus 5 Ordnern.und d 

1842 LABEL neu anlage 


ient zum Speichern Jhrer persönlichen" 

1843 OPEN #datei RANDOM padat$ INDEX inpa$ LENGT 


1914 DATA "Daten im Bereich * Versicherungen, B 

H 76 


ank, Wohnung, PKW und Arbeit *" 

1844 KEYSPEC ltdatei INDEX 1 FIXED 6 UNIQUE OFF 


1915 DATA “Jeder Ordner hat Speicherp1atz für 8 

1845 WINDOW TITLE"Bitte warten. Datei wird 


Bildschirmseiten mit je 14 Zellen." 

eröffnet" 


1916 DATA "Pro Zeile können 70 Zeichen eingegebe 

1846 nl=1001 


n werden . " 

1847 nummer$ = STR$(n1) 


1917 DATA "Zei1ennummerierung erfolgt automatisc 

1848 t$="v" 


h" 

1849 n=1 


19 18 DATA 

1850 a$(n) = "Inhalt: " 


1919 DATA "Neueröffnung:" 

1851 GOSUB speichern2 


1920 DATA "Beim ersten Programmstart wird automa 

1852 t$="b” 


tisch nach Eingabe des Passwortes" 

1853 n=2 


1921 DATA "die neue Datei eröffnet, und jeweils 

1854 a$(n)="Inhalt:" 


alle 5 Ordner mit Nummer 1 belegt." 

1855 GOSUB speichern2 


1922 DATA "Danach kehrt das Programm zum Menue z 

1856 t $ = “a" 


u rück." 

1857 n = 3 


1923 DATA "" 

1858 a$(n) = "Inhalt: " 


1924 DATA "Menue: 

1859 GOSUB speichern2 


1925 DATA "Gewünschte Ordner mit Pfeiltaste anwä 

1860 t$="p" 


hlen, und mit angegebener Taste" 

1861 n=4 


1926 DATA “öffnen...Sie können dann wählen zwisc 

1862 a$(n)="Inhalt:" 


hen Eingabe, Ausgabe und Menue" 

1863 GOSUB spei chern2 


1927 DATA "" 

1864 t$="w" 


1928 DATA "Weiterblättern ...beliebige Taste drü 

1865 n=5 


c ken " 

1866 a$(n)="Inhalt:" 


1929 DATA "Eingabe:" 

1867 GOSUB speichern2 


1930 DATA "Taste.. (E) drücken. Es erscheint die 

1868 RETURN 


Eingabemaske. Daten eingeben und mit" 

1869 


1931 DATA "Taste. . (Enter) speichern. Sie können 

1870 


nach Belieben von jeder Zeile oder" 

1871 LABEL aufbau 


1932 DATA "Position aus die Daten speichern, max 

1872 FOR 1=1 TO 4:CLOSE WINDOW i:NEXT 


aber von Zelle 14 aus. Fehler können" 

1873 FOR i=1 TO 4:CLOSE #i:NEXT 


1933 DATA "mit Pfeiltaste nach links korrigiert 

1874 OPEN #1 WINDOW 1 


werden. Eine Zeile weiterschalten" 

1875 SCREEN #1 GRAPHICS 640 FIXED,200 FIXED 


1934 DATA "erfolgt mit Pfeiltaste nach unten. Da 

1876 WINDOW «1 FULL ON 


ten-Eingabe abbrechen und zum Menue" 

1877 WINDOW #1 TITLE "Unterlagen - Datei" 


1935 DATA " zurückkehren erfolgt mit Taste. .(Home 

1878 WINDOW #1 OPEN 


)" 

1879 SET MODE(2) 


1936 DATA "" 

1880 GOSUB bi 1dl 


1937 DATA "Ausgabe:" 

1881 DIM a$(20) 


1938 DATA "Taste..(A) drücken. Die Daten des jew 

1882 padat$="untlg.dat" 


eils ausgewählten Ordners werden am" 

1883 inpa$="unt1g.idx" 


1939 DATA "Bildschirm angezeigt. Sie haben nun d 

1884 datei=6 


ie Möglichkeit, die Daten seitenweise" 

1885 typindex=l 


1940 DATA "durchzublättern Taste..(B) Einzelne 



Zeilen zu ändern Taste..(Ä) 
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1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1959 

1960 

1961 

1962 

1963 

1964 

1965 

1966 


DATA "Zeilen zu löschen Taste..(L) oder mit 
Taste..(M) zum Menue zurückzukehren." 

DATA "" 

DATA "" 

DATA "" 

DAT A "Ändern:" 

DATA Taste..(Ä) drücken. Nummer der Datenz 
eile eingeben, die geändert werden" 

DATA "3011. Daten erscheinen in brauner Sch 
rlft. Daten ändern (überschreiben)" 

DATA "Geänderte Daten mit Taste..(Enter) sp 
eichern. Kein Änderung durchführen" 

DATA "Taste..(Home) drücken. Nach jeder Spe 
Icherung können Sie weitere " 

DATA "Änderungen durchführen oder zum Menue 
zurückkehren. 

DATA 

DATA "Löschen:" 

DATA'Taste..(L) drücken. Nummer der Datenze 
ile eingeben, die gelöscht werden" 

DATA "soll. Daten erscheinen in brauner Sch 
rift. Taste..(j) Daten löschen" 

DATA Taste..(N) ohne löschen zum Menue zur 
ück. Oer Löschvorgang kann mehrmals“ 

DATA "wiederholt werden. An Stelle des gelö 
achten Dateneintrages kann mit Hilfe " 

DATA "der Änderungsrou11 ne neue Daten elnge 
fügt werden." 

DATA "" 

DATA "Achtung: Nach jeder Benutzung... Da 

tei mit Taste..(End) schließen" 

DATA "" 

DATA " . . . " 


1967 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

1984 

1985 

1986 

1987 

1988 


LABEL t_wahl 

PRINT AT(4;20) COLOR(14);"Weiterb1ättern .. 
.beliebige Taste drücken" 

PRINT AT(4;20);"Nochmal b1ättern...Taste(B) 

Menue...Taste 

(M) " 

LABEL ta21 
t21=INKEY 

IF t21 = 77 OR t21= 109 THEN GOTO zw1_menue 
IF t21=66 OR t21=98 THEN GOSUB bildlc loe:R 
ESTORErGOTO bed_an 
GOTO ta21 


1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 


LABEL dru_cken 

WINDOW TITLE"Daten ausdrucken ... “ 

MOVE 5900;4660:PRINT COLOR(14);"Drucken . . . T 
aste(0) 

GOSUB blldlc_loe 

BOX 150;420,7850,400 FILL WITH 8 COLOR 14 
PRINT AT(13;4);"a ) Welcher Ordner-Inhalt 
soll ausgedruckt werden?" 

PRINT AT(26;6);"Vers1 cherung (1)" 

PRINT AT(26;7);"Bank (2)" 

PRINT AT(26;8);"Pkw (3) " 

PRINT AT(26;9);"Arbeit (4)" 

PRINT AT(26;10);"Wohnung (5) .... Numm 

ep—Taste drücken" 

LINE 200;2500,7900;2500 

PRINT AT{13;13);"b) Sämtliche Ordner-Daten 
(1-5) ausdrucken.... Taste(D) 

LINE 200;1800,7900;1800 

PRINT AT(5;17) COLOR(15);"Achtung:" COLOR(l 
);" Ist ihr Drucker eingeschaltet... sonst 
erfolgt Programmabsturz !" 

PRINT AT(22;20);"Keine Daten ausdrucken 
Menue. . . Taste(M) 

LABEL ta22 
t22=INKEY 

IF t22=49 THEN GOSUB 
IF t22=50 THEN GOSUB 

IF t22=51 THEN GOSUB 

IF t22 = 52 THEN GOSUB p_dru 

IF t22=53 THEN GOSUB w_dru 
IF t22=68 OR t22=100 THEN GOSUB g_dru 

IF t22= 77 OR 122=109 THEN GOSUB zwi menue 


v_d ru 
b_d ru 
d ru 


Listing UDATEI 


1999 

GOTO ta22 

2000 

2001 

2002 

LABEL g dru 

2003 

LPRINT TAB(5);"Ordner(1- 

2004 

samt - Unterlagen..." 
LPRINT 

2005 

GOSUB v dru 

2006 

LPRINT 

2007 

GOSUB b dru 

2008 

LPRINT 

2009 

GOSUB a dru 

2010 

LPRINT 

2011 

GOSUB p dru 

2012 

LPRINT 

2013 

GOSUB w dru 

2014 

RETURN 

2015 

2016 
2017 

LABEL v dru 

2018 

t$=”v" 

2019 

LPRINT TAB(5);"Ordner(1) 

2020 

erungs - Unterlagen..." 
LPRINT 

2021 

GOSUB dru text 

2022 

LPRINT 

2023 

RETURN 

2024 

2025 

2026 

LABEL b dru 

2027 

t$="b" 

2028 

LPRINT TAB(5);"0rdner(2) 

2029 

- Unterlagen..." 

LPRINT 

2030 

GOSUB dru text 

2031 

LPRINT 

2032 

RETURN 

2033 

2034 

2035 

LABEL a dru 

2036 

t$="a" 

2037 

LPRINT TAB(5);"Ordner(3) 

2038 

ts - Unterlagen..." 

LPRINT 

2039 

GOSUB dru text 

2040 

LPRINT 

2041 

RETURN 

2042 

2043 

2044 

LABEL p dru 

2045 

t$="p" 

2046 

LPRINT TAB(5);"Ordner(4) 

2047 

- Unter1 gen..." 

LPRINT 

2048 

GOSUB dru text 

2049 

LPRINT 

2050 

RETURN 

2051 

2052 

2053 LABEL w dru 

2054 

t$="w" 

2055 

LPRINT TAB(5);"Ordner(5) 

2056 

ngs - Unterlagen..." 
LPRINT 

2057 

GOSUB dru text 

2058 

LPRINT 

2059 

RETURN 

2060 

2061 

2062 LABEL dru text 

2063 

1 nd= 1 

2064 

POSITION #datei KEY t$ IN 

2065 

WHILE LEFT$(KEY$(#datei), 

2066 

GET #datei,p$ 

2067 

LPRINT TAB(5)p$.p.text$ 

2068 

POSITION #date1,NEXT 

2069 

WEND 

2070 

RETURN 

2071 

2072 REM . 


Ge 


Versich 


Bank 


Arbei 


Auto 


Wohnu 
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Verflixt 

(und zugenäht) 

Ein Spiel zum Haareraufen 

Ein Schiebefix hat jeder mal besessen. Ob er es käuflich 
am Kiosk nebenan erworben hat oder ob es als tolles Ex¬ 
tra in der Wundertüte zu finden war, das knifflige Ver¬ 
schieben der fünfzehn Kästchen auf einer quadrati¬ 
schen, 16 Felder großen Fläche hat alle mal zur Ver¬ 
zweiflung gebracht. 

Das vorliegende Spielprogramm hat 
diese altbekannte Idee erweitert. In 
“Verflixt“ wurde auf das Leerfeld ver¬ 
zichtet. Verschieben lassen sich auch 
keine Einzelfelder, sondern immer nur 
volle Achtergruppen. Da es sehr viele 
Möglichkeiten des Spielfeldzustandes 
gibt, ist eine Lösung durch Probieren 
nahezu ausgeschlossen. Der Schwie¬ 
rigkeitsgrad des Spieles ähnelt deshalb 
nicht mehr dem üblichen Schiebespiel, 
sondern reicht an den bekannten “Zau¬ 
berwürfel“ heran. Das Spiel wird über 
die Tastatur gesteuert. Basic2 und ein 



Beim Schiebefix ohne Leerfeld können nur ganze Blöcke gedreht werden. 
Eine komplizierte Angelegenheit 


Farbmonitor sind erforderlich. Der 
Spieler hat verschiedene Möglichkei¬ 
ten, sich mit dem Spiel auseinanderzu¬ 
setzen. Auf der einen Seite kann er mit 
einem wohlgeordneten Feld beginnen 
und sich ein erdachtes Ziel setzen, das 
er dann durch geschicktes Verschieben 
erreichen muß. Auf der anderen Seite 
ist es natürlich auch möglich, sich vom 
Computer ein herrliches Durcheinan¬ 


der erstellen zu lassen, das es dann in 
geordnete Bahnen zu bringen gilt. 
Sicher ist, daß der Spieler nach einiger 
Zeit des Grübelns haareraufend den ein 
oder anderen (natürlich harmlosen) 
Fluch von sich gibt, wenn es mal wie¬ 
der nicht so läuft, wie es geplant war. 
Diese Sicherheit war dann auch Grund 
für die Namensgebung. 

(Horst-Dieter Steinwart/jf) 


100 REM Verflixt - Version 1.0 (begonnen am 28. 6. 


138 BOX 1000;1000,3000,3000 COLOR 0 FILL 

1989) 


139 GOSUB färben 

101 REM 


140 GOSUB umrisse 

102 REM 


141 IF w=l THEN RETURN ELSE GOTO auswahl 

103 CLEAR RESET 


142 

104 CLOSE #1,#2:CLOSE WINDOW 3:CL0SE WINDOW 4 


143 LABEL Hintergrund 

105 OPEN #1 WINDOW 1 


144 BOX 0 ; 0,8500,5000 COLOR 8 FILL 

106 SCREEN GRAPHICS 640 FIXED.200 FIXEDrWINDOW FUL 


145 RETURN 

L 


146 

107 WINDOW TITLE " *** Verflixt (Version 1.0) *** 


147 LABEL umrisse 



148 BOX 1000;1000,3000,3000 WIDTH 10 

108 WINDOW OPEN 


149 LINE 1000;1750,4000;1750 WIDTH 3 

109 muster=l:w=0:SET MODE(2) 


150 LINE 1000;2500,4000;2500 WIDTH 3 

110 GOTO anfang 


151 LINE 1000;3250,4000;3250 WIDTH 3 

111 


152 LINE 1 750;1000,1750;4000 WIOTH 3 

112 LABEL hauptprogramm 


153 LINE 2500;1000,2500;4000 WIDTH 3 

113 GOSUB grundfarben 


154 LINE 3250;1000,3250;4000 WIDTH 3 

114 GOSUB Hintergrund 


155 RETURN 

115 GOSUB färben 


156 

116 GOSUB Umrisse 


157 LABEL färben 

117 GOSUB bescHr1ftung1 


158 BOX 1000:1000,750,750 COLOR a4 FILL WITH aa4 

118 GOSUB beschriftung2 


159 BOX 1000:1750,750,750 COLOR a3 FILL WITH aa3 

119 GOTO auswahl 


160 BOX 1000:2500,750,750 COLOR a2 FILL WITH aa2 

120 


161 BOX 1000;3250,750,750 COLOR al FILL WITH aal 

121 


162 BOX 1750:1000,750,750 COLOR b4 FILL WITH bb4 

122 LABEL grundfarben 


163 BOX 1750:1750,750,750 COLOR b3 FILL WITH bb3 

123 IF muster=l THEN GOTO grundmuster 


164 BOX 1750:2500,750,750 COLOR b2 FILL WITH bb2 

124 al=2:a2=2:a3=2:a4=2:aal=8:aa2=8:aa3=8:aa4=8 


165 BOX 1750:3250,750,750 COLOR bl FILL WITH bbl 

125 bl=3:b2=3:b3=3:b4=3:bbl=8:bb2=8:bb3=8:bb4=8 


166 BOX 2500:1000,750,750 COLOR c4 FILL WITH cc4 

126 cl=4:c2=4:c3=4:c4=4:ccl=8:cc2=8:cc3=8:cc4=8 


167 BOX 2500;1750,750,750 COLOR c3 FILL WITH cc3 

127 dl=6:d2=6:d3=6:d4=6:ddl=8:dd2=8:dd3=8:dd4=8 


168 BOX 2500:2500,750,750 COLOR c2 FILL WITH cc2 

128 RETURN 


169 BOX 2500;3250,750,750 COLOR cl FILL WITH ccl 

129 


170 BOX 3250;1000,750,750 COLOR d4 FILL WITH dd4 

130 LABEL grundmuster 


171 BOX 3250;1750,750,750 COLOR d3 FILL WITH dd3 

131 al=2:aal=2:a2=2:aa2=4:a3=2:aa3=7:a4=2:aa4=8 


172 BOX 3250;2500,750,750 COLOR d2 FILL WITH dd2 

132 bl = 3:bbl = 2:b2 = 3:bb2 = 4:b3 = 3: bb3=7:b4=3:bb4=8 


173 BOX 3250,3250,750,750 COLOR dl FILL WITH dd1 

133 cl=4:ccl=2:c2=4:cc2=4:c3=4:cc3=7:c4=4:cc4=8 


174 RETURN 

134 dl=6:ddl=2:d2=6:dd2=4:d3=6:dd3=7:d4=6:dd4=8 


175 

135 RETURN 


176 

136 


177 LABEL beschr1ftung1 

137 LABEL Spielverlauf 
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178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 


PRINT AT(12 
PRINT AT(5; 
PRINT AT(5; 
PRINT -AT ( 5 ; 
PRINT AT(12 
RETURN 
LABEL besch 
PRINT AT(52 
PRINT AT(5 2 
PRINT AT(5 2 
PRINT AT(52 
PRINT AT(52 
PRINT AT(52 
PRINT AT(52 
PRINT AT(52 


;4) "A -> B ' -> C->" 

7) "L \/’’ : PRINT A T ( 4 1 ; 7 ) " D \/" 

10)"K \/":PRINT AT(41;10) "E \/' 
13)"J \/”:PRINT AT(41;13) "F \/' 
;19) "I -> H -> G -> " 


193 

194 LABEL auswahl 


r i ftung2 

;4)"Wählen Sie einen " 

;5)"Achterblock !" 

18) "A - L = Drehen eines 
; 11 ) " X = Ordnen 11 
I 12)"Y = automatisch verdr 
;13)"2 = Muster aus/ein" 

; 15) "ESC = Programmende'' 
;18)"Ihre Wahl : ",ein$ 


Blocks' 
ehen " 


195 

ein$=INKEY$ 

:IF ein$=" 

196 

IF 

ein$=CHR$(27) 

THEN 

197 

ein$=UPPER$(ein$) 

198 

IF 

ein$=“A" 

THEN 

GOTO 

199 

IF 

ein$="B" 

THEN 

GOTO 

200 

IF 

ei n$ = ”C" 

THEN 

GOTO 

201 

IF 

ei n$="D" 

THEN 

GOTO 

202 

IF 

ei n$="E" 

THEN 

GOTO 

203 

IF 

ein$="F" 

THEN 

GOTO 

204 

IF 

ein$="G" 

THEN 

GOTO 

205 

IF 

ein$="H" 

THEN 

GOTO 

206 

IF 

ein$="I“ 

THEN 

GOTO 

207 

IF 

e1n$="J" 

THEN 

GOTO 

208 

IF 

ein$="K" 

THEN 

GOTO 

209 

IF 

ein$="L" 

THEN 

GOTO 

210 

IF 

ein$="X" 

THEN 

GOTO 

211 

IF 

ein$="Y" 

THEN 

GOTO 

212 

IF 

ein$="Z" 

THEN 

GOTO 


213 GOTO auswahl 

214 

215 LABEL ende 

216 CLEAR RESET 

217 SYSTEM 

218 

219 LABEL drehung_a 

220 y=bl:bl=al:al=a2:a2=a3:a3= 

: b2 = y 

221 y=aal:aal=aa2:aa2=aa3:aa3= 
bb3=bb2:bb2=bbl:bbl=y 
GOTO Spielverlauf 


" THEN GOTO auswahl 
GOTO ende 

d rehung_a 
d rehung_b 
d rehung_c 
drehung_d 
drehung_e 
d rehung_f 
d rehung_g 
d rehung_h 
d rehung_i 
d rehung_j 
drehung_k 
d rehung_l 
ordnen 
automatisch 
wirklich 


222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242- 

243 

244 

245 

246 

247 

248 

249 


LABEL drehung_b 

y=cl :cl=bl:bl=b2:b2=b3:b3= 

: c 2 = y 

y=ccl:ccl=bbl:bbl=bb 2 :bb 2 = 
cc4=cc3:cc3=cc2:cc2=y 
GOTO Spielverlauf 

LABEL drehung_c 
y=dl:dl=cl:cl=c2:c2=c3:c3= 
: d2 = y 

y=dd 1 :ddl=ccl:ccl=cc 2 :cc 2 = 
dd4=dd3:dd3=dd2:dd2=y 
GOTO Spielverlauf 

LABEL drehung_d 

y=d 2 :d 2 =dl:dl=cl:cl=bl:bl= 

: c2 = y 

y=dd 2 :dd 2 =ddl:ddl=ccl:ccl= 
aa 2 =bb 2 :bb 2 =cc 2 :cc 2 =y 
GOTO Spielverlauf 

LABEL drehung_e 
y=d3:d3=d2:d2=c2:c2=b2:b 2 : 

: c3=y 

y=dd3:dd3=dd2:dd 2 =cc 2 :cc 2 = 
aa3=bb3:bb3=cc3:cc3=y 
GOTO Spielverlauf 

LABEL drehung_f 

y=d4:d4=d3:d3=c3:c3=b3:b3= 

: c4=y 

y=dd4:dd4=dd3:dd3=cc3:cc3= 
aa4=bb4:bb4=cc4:cc4=y 
GOTO Spielverlauf 

LABEL drehung g 


=a4:a4=b4:b4: 
: aa4:aa4=bb4: 

b4:b4=c4:c4= 
bb3:bb3= bb4: 

= c4:c4 = d 4:d4 = 
=cc3:cc3=cc4: 

=al:a1=a 2 :a2= 
= bbl:bbl = aal: 

: a2:a2=a3:a3= 
■bb2:bb 2 =aa 2 

a3:a3=a4:a4= 
bb3:bb3=aa3: 


b3:b3=b2 
bb4= bb3: 


c3:c3=c2 
bb4=cc4: 


d3:d 3 = d 2 
cc4=dd4: 


b2:b2=c2 
aal=aa 2 : 


b3:b3=c3 
aa2=aa3: 


b4:b4=c4 
aa3=aa4: 


Usting VERFLIXT 


VirusDoktor 


Eine Programmsammlung, die Sie gegen 
alle bekannten PC-Computer-Viren wappnet 


Auch schon betroffen? 

- Schäden durch 
infizierte, un¬ 
brauchbare 
Programm¬ 
dateien? 


- Datenverlust 
durch forma¬ 
tierte und 
zerstörte 

Speichermedien? 

- Zeitverlust und Ärger 
durch Verstellen der 
System Konfigura¬ 
tion? 


STOP 



VirCheck - 

Ein Kontrollprogramm der Superklasse! 

• Kontrolle Ihrer Programme auf Längenänderung, Attributierung etc. 

• Spezieller Check für virusbedingte Abänderung des Programmcodes 

• Überwachung von Umbenennungen und Verschiebungen von Dateien 

• Beliebige Auswahl der kontrollierten Programmgruppen 

• Hohe Effektivität und Geschwindigkeit durch variables SETUP 

• Komfortables, menügesteuertes, grafisches Installationsprogramm 

VirSperr - 

dreimal Schutz vor Virusinfektion 

• Drei Programme zum Absichern Ihrer Dateien vor Veränderungen 

• Ausführlicher Report über versuchte Zugriffe auf Ihre Dateien 

• Virussicheres Fixieren von gesetzten Read-Only-Attributen 

• Ein- und Ausschalten des Schreibschutzes per Tastendruck 

Und als Zugabe 

CMOS-BKP - Konfigurationssicherung für AT- und AT- kompatible Rechner 


VirusDoktor 


Fünf wertvolle Programme zum Preis von einem 
plus ausführliche Programmanleitung 
inklusive Grundwissen über Computerviren 

Für alle MS-DOS-Computer 


99,- DM (unverbindliche Preisempfehlung) 



Wenn Sie über den DMV-Bestellservice bestellen, gilt folgendes: 



Inland: 





Einzelpreis 

99.- DM 

Einzelpreis 

99,- DM 


zzgl, Versandkosten 

4,- DM 

zzgl. Versandkosten 

6,- DM 


Endpreis 

103,- DM 

Endpreis 

105,- DM 



Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege 
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250 y=d4:d4=c4:c4=c3:c3=c2:c2=cl:cl=dl:dl=d2:d2=d3 
: d3=y 

251 y=dd4:dd4=cc4:cc4=cc3:cc3=cc2:cc2=ccl:ccl=ddl: 
ddl=dd2:dd2=dd3:dd3=y 

252 GOTO Spielverlauf 

253 

254 LABEL drehung_h 

255 y=c4:c4=b4:b4=b3:b3=b2:b2=bl:bl=c1:cl=c2:c2=c3 
: c3 = y 

256 y=cc4:cc4=bb4:bb4=bb3:bb3=bb2:bb2=bbl:bbl=ccl: 
ccl=cc2:cc2=cc3:cc3=y 

257 GOTO Spielverlauf 

2 5 B 

259 LABEL drehung_1 

260 y=b4:b4=a4:a4=a3:a3=a2:a2=al:al=bl:bl=b2:b2=b3 
: b3=y 

261 y=bb4:bb4=aa4:aa4=aa3:aa3=aa2:aa2=aal:aal=bbl: 
bbl=bb2:bb2=bb3:bb3=y 

262 GOTO Spielverlauf 

263 

264 LABEL drehung_j 

265 y=a4:a4=a3:a3=b3:b3=c3:c3=d3:d3=d4:d4=c4;c4=b4 
: b4=y 

2 66 y=aa4:aa4 = aa3:aa3=bb3:bb3=cc3:cc3=dd3:dd3=dd4 : 
dd4=cc4:cc4=bb4:bb4=y 

267 GOTO Spielverlauf 

268 

269 LABEL drehung_k 

270 y=a3:a3=a2:a2=b2:b2=c2:c2=d2:d2=d3:d3=c3:c3=b3 
: b3=y 

271 y = aa3:aa3=aa2:aa2 = bb2:bb2 = cc2:cc2=dd2:dd2=dd3 : 
dd3=cc3:cc3=bb3:bb3=y 

272 GOTO Spielverlauf 

273 

274 LABEL drehung_l 

275 y=a2:a2 = al:al = bl:bl = cl: cl = d 1:dl = d2:d2 = c2:c2 = b2 
: b2=y 

276 y = aa2:aa2 = aal:aa1 = bb1:bbl = ccl:ccl=ddl:ddl = dd2 : 
dd 2 =cc 2 :cc 2 =bb 2 :bb 2 =y 

277 GOTO Spielverlauf 

278 

279 LABEL ordnen 

280 GOSUB grundfarben 

281 GOTO Spielverlauf 

282 

283 LABEL automatisch 

284 1=INT(RND#6) 

285 FOR a=1 TO i 

286 y=a2:a 2 =al:al=bl:bl=cl:cl=dl:dl=d 2 :d 2 =c 2 :c 2 =b 2 
: b2 = y 

287 y=aa2:aa2=aal:aal=bbl:bbl=ccl:ccl=ddl:ddl=dd2: 
dd2=cc2:cc2=bb2:bb2=y 

288 NEXT a 

289 i=INT(RND*5) 

290 FOR a=1 TO i 

291 y=al:al = a2:a2=a3:a3=a4:a4=b4:b4=b3:b3=b2:b2=bl 
: bl = y 

292 y=aal:aal=aa2:aa2=aa3:aa3=aa4:aa4=bb4:bb4=bb3: 
bb3=bb2:bb2=bbl:bbl=y 

293 NEXT a 

294 GOTO Spielverlauf 

295 

296 LABEL musterwahl 

297 muster=l-muster 

298 GOSUB grundfarben 

299 GOTO Spielverlauf 

300 

301 LABEL wirklich 

302 wirk = ALERT 1 TEXT "Wenn Sie das Muster ","um 

schalten, werden gl eichzeitig","d1e Farben geo 
rdnet." BUTTON RETURN " umschalten zurück 

303 IF wirk=2 THEN GOTO auswahl ELSE GOTO musterwa 
hl 

304 

305 LABEL Spielregel 

306 GOSUB hintergrund 

307 PRINT AT(2;3) F0NT(3) P0INTS(20) COLOR(2) " ** 

********** SPIELREGEL ** 

**********" 

308 PRINT AT(3;6)"'VERFLIXT’ ist ein neues und zie 
milch kniffeliges Denkspiel." 

309 PRINT A T ( 3 ; 7 ) " E s ähnelt den Schiebe-Geduldsspi 
eien, bei denen ein Spielfeld" 
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310 PRINT AT(3;8)"aus 15 Einzelfeldern und einem L 
eerfeld z.B. nach Nummern oder" 

311 PRINT AT(3;9)"Buchstaben geordnet werden soll. 


312 PRINT AT(3;11) COLOR(2)"Doch nun wird es 'verf 
1 1 xt 1 

313 PRINT AT(3;13)"‘VERFLIXT' hat kein Leerfeld !" 

314 PRINT AT(3;15)"Al 1e Felder sind besetzt. Es la 
ssen sich immer nur acht Spielsteine" 

315 PRINT AT(3;16)"g1eichze1tig bewegen. Am Rand d 
es Spielfeldes sehen Sie Buchstaben" 

316 PRINT AT(3;17)"und Pfleile, die die Bewegungsr 
ichtung von jeweils acht Spie1steinen" 

317 PRINT AT(3;18)"angeben." 

318 PRINT AT(3;20) COLOR(2) "ESC = Hauptprogramm 

weiter = andere Taste !" 


319 LABEL weiter 

320 w$=INKEY$:IF w$="" GOTO weiter 

321 IF w$=CHR$(27) THEN GOTO hauptprogramm 

322 GOSUB hintergrund 

323 GOSUB grundmuster 

324 GOSUB färben 

325 GOSUB umrisse 

326 GOSUB beschriftung1 

327 PRINT AT(5;2 ) COLOR(2) "Spielregel: Seite 2" 

328 PRINT AT(50;2) “Links sehen Sie" 

329 PRINT AT(SO;3) "das Spielfeld !" 

330 PRINT AT(50;5) "Wenn Sie die Taste 'A'" 

331 PRINT AT(50;6) "drücken, bewegen Sie" 

332 PRINT AT(50;7) "die erste Achterrunde" 

333 PRINT AT ( 50 ; 9 ) COLOR(2) "Testen Si,e d i e " 

334 PRINT AT(50;10) COLOR(2) "Taste A'!",w$ 

335 LABEL weiter2 

336 w$=INKEY$:IF w$="" GOTO weiter2 

337 IF w$="A" OR w$="a" GOTO wirkung_weiter2 ELSE 
GOTO weiter2 


338 LABEL wirkung_weiter2 

339 w=1:GOSUB drehung_a:w=0 

340 BOX 5000;1000,2500,6000 COLOR(8) FILL 

341 PRINT AT(50;2 ) "Sie sehen, daß sich alle" 

342 PRINT AT(50;3) "Felder der beiden ersten" 

343 PRINT AT(50;4) "Spalten um ein Feld im" 

344 PRINT AT(50;5) "Uhrzeigersinn verschoben" 

345 PRINT AT(50;6) "haben." 

346 PRINT AT(50;8) "Stellen Sie sich nun Ihr" 

347 PRINT AT(50;9) C0L0R(2) "S p i e 1 z i e 

348 PRINT AT(50;10) "selbst." 

349 PRINT AT(50;12) "Vielleicht versuchen Sie 

350 PRINT AT(50;13) "die Farben waagerecht zu 

351 PRINT AT(50;14) "ordnen !" 

352 PRINT AT(50;15) "Verzweifeln Sie nicht, e 

353 PRINT AT(50;16) "ist wirklich sehr schwer 

354 PRINT AT(50;18) COLOR(2) "Viel Spass !" 

355 PRINT AT(3;20) COLOR(2) "ESC = Hauptprogr 

zurück = andere Taste !",taste$ 


1 " 


356 LABEL weiter3 

357 taste$=INKEY$ 

358 IF taste$="" THEN GOTO weiter3 

359 IF taste$=CHR$(27) THEN GOTO hauptprogramm ELS 
E GOTO Spielregel 


360 

361 LABEL anfang 

362 GOSUB hintergrund 

363 FCR 1=1 TO 14 

364 BOX 500;500,7200,4200 COLOR(i+l) WIDTH 5 ROUND 
ED 

365 PRINT AT(20;10) COLOR(i) FONT(2) POINTS(36) " 
VERFLIXT" 

366 PRINT AT(2 7;13) C0L0R(2) "SPIEL und SPIELIDEE 


von 


367 PRINT AT(2 7;15) COLOR(2) "HORST-DIETER STEINW 
ART" 

368 NEXT i 

369 PRINT AT(10;19) “S = Spielregel H = Haupt 

Programm ESC = Programmende",weiter4$ 

370 LABEL weiter4 

371 weiter4$=INKEY$ 

372 IF weiter4$="S" OR weiter4$="s" THEN GOTO spie 
1 rege 1 

373 IF weite r 4$=“H" OR weiter4$ = "h" THEN GOTO haup 
tprog ramm 

374 IF weiter4$=CHR$(27) THEN GOTO ende 

375 GOTO weite r4 

376 
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Eine Maus macht Ärger 

“Merkwürdig. Gestern habe ich hei einem Freund Bard’s Tale gespielt. Er 
hat zwar nur einen XYZ PC, der halb so schnell getaktet wird wie mein 
Ainstrad, die Animationen der Grafik war aber schneller. Woran mau das 
wohl liegen?“ 

Diese Frage oder “Warum läuft die Uhr im Rechner plötzlich so lang¬ 
sam?“, “Wieso hängt der Rechner, wenn ich eine Maustaste drücke?“ 
wird sich schon so manche(r) Besitzer(in) eines PC 1512 oder 1640 einmal 
gestellt haben. 


Die Antwort mancher Zeitschriften, an 
die man sich hilfesuchend wendet, ’Es 
liegt an der Maus’, meist verbunden 
mit einer Patchanweisung für den 
Maustreiber, bestehend aus einer An¬ 
sammlung von hexadezimalen Zahlen, 
hilft so recht nicht weiter. Aus diesem 
Grund wird hier versucht darzulegen, 
woher diese Probleme kommen, war¬ 
um Programme die beschriebenen Re¬ 
aktionen zeigen und, last but not least, 
wie man teilweise Abhilfe schaffen 
kann. 

Warum eine Maus so 
anschließen, wie es alle tun? 

Diese Frage werden sich die Entwick¬ 
ler von Amstrad wohl gestellt haben, 
als sie ihre Rechner mit einer Maus zu 
versorgen hatten. 

Eine normale Microsoft-kompatible 
Maus sendet ihre Daten in Paketform 
über die serielle Schnittstelle (deshalb 
auch serielle Maus genannt) an den 
Rechner. Das zur Maus gehörige Trei¬ 
berprogramm empfängt diese Daten, 
extrahiert alles Interessante heraus, 
und stellt sie der Öffentlichkeit, über 
den Interrupt 033H, zur Verfügung. 
Andere Varianten sind die sogenannte 
Bus- und Port-Mäuse. Bei der Bus- 
Maus wird eine Steckkarte mitgelie¬ 
fert. Sie enthält den Großteil der Maus¬ 
elektronik und wird in einen freien Slot 
des Rechners gesteckt, während bei ei¬ 
ner Port-Maus der Anschluß und Teile 
der Elektronik auf der Rechnerplatine 
integriert sind. Die Daten der Maus 
werden auf I/O-Ports des Rechners ab¬ 
gebildet, wo sie der Maustreiber ab¬ 
holt. 

Technisch gesehen gehört die Am- 
strad-Maus zu den Port-Mäusen, be¬ 
sitzt aber einige Besonderheiten, die zu 
Problemen führen. Die große Merk¬ 
würdigkeit dieser Maus ist die Behand¬ 
lung ihrer Tasten. Während (alle mir 
bekannten) Mäuse den Zustand der Ta¬ 
sten mit den Bewegungsdaten der Maus 
zum Treiber schicken, wählte Amstrad 


einen Umweg (vielleicht um ein paar 
elektronische Bauteile einzusparen). 
Zwei der neun Anschlüsse der Maus 
wurden auserkoren, den Zustand der 
Maustasten darzustellen, (high = ge¬ 
drückt, low = nicht gedrückt). Diese 
Leitungen sind auf der Rechnerplatine 
gleich wieder an die Tastatur (aha, des¬ 
halb dieser merkwürdige Tastaturan¬ 
schluß) angeschlossen. Der Tastatur¬ 
prozessor verarbeitet die Mausbuttons 
als Tasten mit den Scancodes 126 und 
125, die er wieder auf die Reise zum 
Rechner schickt. 

Nach diesem ganzen Hin und Her muß 
jetzt der Tastaturtreiber (Keybgr) die 
Codes der Maustasten aus den ankom- 
menden Daten herausfischen und über 
den Interrupt 06H dem Maustreiber 
mitteilen, daß eine Maustaste gedrückt 
oder losgelassen wurde. 

Nun wird es allmählich klar, warum 
ohne Amstrad Maus- und Tastaturtrei¬ 
ber so manches am Rechner nicht mehr 
funktioniert und Programme, die die 
Tastatur und/oder Maus direkt abfra- 
gen, alle Viere von sich strecken. 

Probleme, Inkompabilitäten 

Ein Problem, das allerdings sehr selten 
auftritt, hängt mit der Verwendung des 
Interrupts 06H durch Amstrad zusam¬ 
men. Amstrad benutzt ihn, damit der 
Tastaturtreiber dem Maustreiber mit¬ 
teilen kann, wenn eine Maustaste betä¬ 
tigt wurde. Nach Intel-Vorgabe wird 
dieser Interrupt jedoch (ab 80286 Pro¬ 
zessoren) vom Prozessor dazu benutzt, 
dem Betriebssystem mitzuteilen, wenn 
er auf einen Undefinierten Befehlscode 
trifft (z.B. durch einen Programmfeh¬ 
ler). Da IBM und Intel die Maßstäbe 
bei PCs setzen, orientieren sich Pro¬ 
gramme an Big Blues Vorgaben. Be¬ 
stimmte Programme, zumeist Debug¬ 
ger, die auch auf ATs laufen, hängen 
sich in den Interrupt 06H. Wird dieser 
vom Tastaturtreiber aufgerufen, den¬ 
ken diese Programme, es wäre das be¬ 
schriebene Problem auf einem AT, und 
versuchen, den Rechner AT-gemäß 


wieder auf die Beine zu stellen. Das 
geht bei einem PC natürlich daneben, 
und der Rechner steht bis zum nächsten 
Reset. 

Abhilfe kann hier nur geschaffen wer¬ 
den, wenn man einen eigenen Tastatur¬ 
treiber schreibt und den Interrupt 06H 
indirekt aufruft. Dies würde aber den 
Rahmen dieses Artikels bei weitem 
sprengen, deshalb nun zu lösbaren Pro¬ 
blemen. 

Dreimal mehr 

Das oben angesprochene Problem der 
zu langsamen Grafikanimation und der 
zu langsam laufenden Softwareuhr 
wird durch den Maustreiber ausgelöst. 
Wie angedeutet werden die Bewegun¬ 
gen der Maus intern von der Hardware 
aut zwei I/O-Ports abgebildet. Da diese 
Ports nur über 8 Bit verfügen, das achte 
Bit als Vorzeichenbit aber wichtig für 
die Richtung der Bewegung der Maus 
ist, wollten die Amstradentwickler si¬ 
cher gehen, daß es zu keinen Überläu¬ 
fen und damit Umschlagen der Rich¬ 
tung kommen kann. Deshalb wurde der 
Timerbaustein des PCs so umprogram¬ 
miert, daß er statt 18,2mal pro Sekunde 
etwa 54mal in der Sekunde einen Inter¬ 
rupt 08H auslöst. Dieser Interrupt hat 
die Aufgabe, den Zähler der Software¬ 
uhr des Rechners bei jedem Aufruf 
weiterzuzählen und danach einen Inter¬ 
rupt 01CH auszulösen. (Dieser Inter¬ 
rupt 01 CH ist ganz offiziell für Pro¬ 
gramme da, die darauf angewiesen sind 
in einem festem Zeitraster aufgerufen 
zu werden.) Diese 18,2 Interrupts pro 
Sekunde sind eine der magischen Kon¬ 
stanten eines PCs. Deshalb haben die 
Entwickler der Amstrad-Computer 
durch eine kleine Routine innerhalb des 
Maustreibers dafür gesorgt, daß die ur¬ 
sprüngliche BIOS-Routine, trotz Um¬ 
programmierung des Timers, nur alle 
18- statt 54mal pro Sekunde aufgerufen 
wird. Diese Routine besteht aus einem 
Zähler, der nur bei jedem drittem 
Durchlauf die Originalroutine aufruft 
(54/18). Da aber Programmierer sehr 
mißtrauische Leute sind, wird von vie¬ 
len Programmen, die sich in den Inter¬ 
rupt 01 CH hängen, erstmal der Timer¬ 
baustein sicherheitshalber auf 18,2 
Ticks programmiert. Andere Program¬ 
me, die einen schnelleren Rhythmus 
brauchen, programmieren den Timer¬ 
baustein während ihrer Beendigung auf 
18,2 Ticks um, um geordnete Verhält¬ 
nisse zu hinterlassen. Egal ob am Start 
oder am Ende, keines dieser Program¬ 
me rechnet mit der Routine, die" brav 
nur jeden dritten Tick des Timers 
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durchläßt. Entweder laufen dann die 
Programme selbst oder bestimmte 
BIOS-Routinen nach der Beendigung 
des Programms langsamer. 

Rettung 

Abhilfe kann mit den beiden hier abge¬ 
druckten Patch-Programmen geschaf¬ 
fen werden. Diese Programme sind 
Eingabe-Dateien für den mit MS-DOS 
gelieferten Debugger. Die Datei 

M_1512.DBG (Listing 1) ist die Datei 

für Maustreiber des PC 1512, die Datei 

M_1640.DBG (Listing 2) für den 

Treiber des PC 1640. 

Sie werden sehen, daß die Versions¬ 
nummern der beiden Treiber gleich 
sind. 

1640 Treiber 

Als Unterscheidungsmerkmal dienen 
die zu patchenden Routinen. Um sicher 
zu gehen, laden Sie Ihren Maustreiber 
mit 

debug mouse.com 

in den DOS-Debugger (stellen Sie si¬ 
cher, daß der Debugger sich auf Ihrer 
Diskette befindet oder das Unterver¬ 
zeichnis in Ihren Pfaddefinitionen). 
Geben Sie nun ein: 
u 944 

Jetzt sollte folgendes auf Ihrem Schirm 

erscheinen (für den mit M_1640.DBG 

zu patchenden Treiber): 
x:0944 DEC BYTE PTR [018F] 
x:0948 JNZ 0958 

(Das x steht für die vierstellige Zahl, 
die der Debugger ausgibt, hier aber 
nicht interessiert.) Steht hier etwas an¬ 
deres, lesen Sie jetzt bei 1512 Treiber 
weiter. Ansonsten geben Sie ein: 

ulb32 

Auf dem Schirm sollte nun stehen: 
x: 1B32 MOV DX, 0043 
x:lB35 MOV AL, 34 
x:lB37 OUT DX, AL 
x: 1B38 MOV DX, 0040 
x:lB3B MOV AX, 5555 

Wenn dies auch stimmt, können Sie mit 
M_1640.DBG und dem Debugger Ih¬ 

rer Maus Beine machen. 

1512 Treiber 

Handelt es sich bei Ihrem Rechner um 
einen PCI512, geben Sie ein: 

u 90c 

Es sollte erscheinen: 


x:090C DEC BYTE PTR [018F] 
x:0910 JNZ 0958 

Stimmt dies mit dem Bild auf Ihrem 
Schirm überein, geben Sie ein: 

u la5f 

Es sollte erscheinen: 
x: 1A5F MOV DX, 0043 
x:lA62 MOV AL, 34 
x: 1A64 OUT DX. AL 
x: 1A65 MOV DX, 0040 
x: 1A68 MOV AX, 5555 

Stimmt auch dies, können Sie jetzt mit 
q den Debugger verlassen und die Da¬ 
tei M_1512.DBG abtippen. 

Patch as Patch can 

Achten Sie UNBEDINGT darauf, auch 
die Leerzeilen mit abzutippen (die sich 
hinter dem Semikolon befindlichen 
Kommentare brauchen nicht abgetippt 
zu werden). Ferner ist wichtig, nach 
dem letzten q ein Return einzugeben. 
Patchen Sie nur an einer Kopie Th res 
Treibers, falls Sie einen Tippfehler ma¬ 
chen sollten. Wenn Sie die Datei als 
reine ASCII-Datei vorliegen haben, 
kopieren Sie Ihren Maustreiber, den 
Debugger und die Patch-Datei auf eine 
Diskette und geben folgendes beim 
DOS-Prompt ein: 

debug mouse.com <M_????.DBG 

Für die Fragezeichen geben Sie die 
Zahl der herausgesuchten Datei an. 
Falls Sie keinen Fehler gemacht haben, 
sollte nun ein gepatchter Maustreiber 
entstehen. Diese Erstellung erledigt 
der Debugger für Sie. 

Die beiden einzigen Unterschiede zum 
Original sind: 

1. Keine Probleme mehr durch die Um¬ 
programmierung des Timers. 

2. Bei sehr schnellen Bewegungen der 
Maus kann es passieren, daß der Maus¬ 
zeiger, durch Überlauf der I/O-Ports, 
etwas hektisch durch die Gegend hüpft. 
Zum Schluß nochmal die Warnung: 
PATCHEN SIE NIE EIN ORIGINAL!!! 


Listing 

1: (Mit Texteditor abtippen 

und unter dem Namen M _ 1512. DBG 

als ASCII-Datei sichern) 

a 90C 


nop 

;Aus“noppen “ der Zeilen, 

nop 

;die die Biosroutinen nur 

nop 

Jedes 3. Mal aufrufen 

nop 


nop 


nop 


nop 



nop 


nop 


nop 


nop 


a 1A5F 


nop 

;Aus “noppen “ der Timer- 

nop 

;initialisierung. 

nop 

; 

nop 

;Alle Leerzeilen unbedingt 

nop 

;mit eingeben! 

nop 

/ 

nop 

;Nach dem q am Schluß ein 

nop 

;Return nicht vergessen! 

nop 


nop 


nop 


nop 


nop 


nop 


nop 


nop 


w 


q 



Listing 2. 

(Mit Texteditor abtippen 

und unter dem Namen M _ 1640. DBG 

als ASCII-Datei sichern) 

a 944 


nop 

;Aus “noppen " der Zeilen, 

nop 

;die die Biosroutinen nur 

nop 

Jedes 3. Mal aufrufen 

nop 


nop 


nop 


nop 


nop 


nop 


nop 


nop 


a IB32 


nop 

;Aus “noppen “ der Timer- 

nop 

Jnitialisierung. 

nop 


nop 

;Alle Leerzeilen unbedingt 

nop 

;mit eingeben! 

nop 

;Nach dem q am Schluß 

nop 

;ein Return nicht 

nop 

;vergessen 

nop 


nop 


nop 


nop 


nop 


nop 


nop 


nop 


w 


q 



(Robert Haas/jf) 
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Der Knüller der Saison: 


Das Buch zum JOYCE! 


JOYCE - mehr als ein Text- Alle Besitzer eines PCW 8256/8512/9512, die 


System 


ahnten, daß der Horizont ihres Computers weit 
über LocoScript hinausgeht, finden jetzt die 


Die Autoren, in der JOYCE-Szene keine 
Unbekannten, haben auf über 300 Sei¬ 
ten alles Wissenswerte über die “ande¬ 
re Seite“ der PCWs zusammengetra¬ 
gen. Anfänger wie Profis, Anwender wie 
Programmierer finden in diesem Buch 


Bestätigung 



einen reichen Schatz an Tips und Tricks 
sowie ein unentbehrliches Nachschla¬ 
gewerk. Erstmals wird auch in einem 
Buch zum PCW ein “heißes Eisen“ aus¬ 
führlich behandelt: die Hardware. Die¬ 
ses Kapitel zeigt völlig neue Möglichkei¬ 
ten des JOYCE - so wird beispielswei¬ 
se der Anschluß eines Sprachsynthesi¬ 
zers und der Selbstbau einer Schnitt¬ 
stelle besprochen. 

Ausführliche Kapitel über BASIC und 
LOGO erlauben Ihnen, diese Sprachen 
auszureizen: Anfänger, die sich erst¬ 


mals in der Programmierung versuchen 
wollen, finden durch sinnvolle kurze Bei¬ 
spielprogramme wertvolle Unterstüt¬ 
zung. Ein besonderes “Schmankerl“ ist 
das große Extra-Kapitel zur JETSAM-' 
Dateiverwaltung! A 


Aus dem Inhalt: 


Sprachen: 

- LOGO als Grafiker 

- komplette Befehlsübersicht 

- BASIC: Erläuterungen aller Befehle 
mit Beispielprogrammen 

- JETSAM: Generator für JETSAM- 
Verarbeitung 

- Kurzübersicht: Turbo Pascal & C 

Programmierhilfen, Interna, Tips und 
Tricks: 

- Steuercode-Tabellen für Bildschirm 


Hardware 

- Speichererweiterung 

- Zweitlaufwerk 

- Druckkopfreinigung 

- Bildschirminverter 

- Schnittstelle am Expansionsport 

- Sprachsynthesizer 


und Drucker 

- XBIOS-Routinen 

- OUTs und POKEs unter BASIC 



Weiterhin erhältlich: 

- doppelte Platine, geprüft 

- 3“-Diskette mit allen Dateien und Programmen 
Bestellkarte im Buch 


JOYCE - mehr als ein Text¬ 
system 


69,- DM 

Wenn Sie über den DMV-Bestellservice bestellen, gilt folgendes: 


Bestellnummer: 404 

324 Seiten mit farbigen Abbildungen 

Hardcover, gebunden 

ISBN 3-926177-02-0 


Inland: 

Einzelpreis 
zzgl. Versandkosten 


69,- DM Einzelpreis 

4,- DM zzgl. Versandkosten 


Ausland: 


69,- DM 
6,- DM 


Endpreis 


73,- DM Endpreis 


75.- DM 


Bitte benutzen Sie die Bestellkarte. 



DMV-Verlag ■ Postfach 250 - 3440 Eschwege 
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I—PC-Test 


FINESSE - DTP für jeden 

Inzwischen sind fast alle Anwendungsbereiche mit Software für jeden Geld¬ 
beutel abgedeckt. Leider stellt sich nur zu oft heraus, daß preiswerte Pro¬ 
gramme gegenüber professioneller Software erhebliche Einschränkungen 
aufweisen, nicht selten sogar ungeeignet erscheinen — selbst bei minimalen 
Anforderungen. Um so mehr erfreut dann ein Programm wie Finesse, bei 
dem sowohl der Preis, als auch die Leistung stimmt. 


Finesse ist ein DTP-Programm. Diese 
aus dem Amerikanischen stammende 
Abkürzung (Desktop Publishing) hat 
sich auch in unserem Sprachraum der¬ 
art durchgesetzt, daß es kein deutsches 
Äquivalent hierzu gibt. Bleiben wir 
also bei der Bezeichnung DTP. Im Ge¬ 
gensatz zu vielen Programmen der 
gleichen Preisklasse ist Finesse ein 
echtes DTP-Programm. und nicht le¬ 
diglich ein Textverarbeitungspro¬ 
gramm mit der Möglichkeit, Bildmate¬ 
rial zu integrieren. 

Das Konzept von Finesse 

Sinn und Zweck eines DTP-Program- 
mes ist die Erstellung von Dokumen¬ 
ten. “Dokument“ wird hier im weite¬ 
sten Sinne des Wortes verstanden, 
kann sich also auf einseitige Datenblät¬ 
ter, mehrseitige Broschüren, auf länge¬ 
re Geschäftsberichte und sogar auf 
ganze Bücher beziehen. Hier wird 
schon klar, daß es nicht lediglich um 
die Eingabe und den Ausdruck von rei¬ 
nem Text geht, sondern auch um des¬ 
sen Gestaltung, eben das Layout sol¬ 
chen Materials. Ein Dokument besteht 
immer aus einzelnen Seiten, wobei Fi¬ 
nesse die gängigsten internationalen 
Seitenformate (sowohl im Hoch- wie 
auch im Querformat) berücksichtigt. 
Innerhalb einer Seite kann Text und 
Bildmaterial beliebig plaziert werden. 
Für präzise Anordnungen können in 
vielen Fällen Rasterfunktionen ver¬ 
wendet werden. Finesse verfügt auch 
über die Möglichkeit, gewisse Stan¬ 
dard-Elemente — z.B. Seitennum¬ 
mern, Kopf- oder Fußleisten, Logos 
und ähnliches — automatisch auf neue 
Seiten zu übernehmen, so daß der An¬ 
wender diese nicht jedesmal neu pla¬ 
zieren muß. Auch die Rasterstruktur 
kann von einer auf die andere Seite ko¬ 
piert werden, um sicherzuslellen, daß 
die Anordnung der Spalten durchge¬ 
hend identisch bleibt und so ein einheit¬ 
liches, professionelles Aussehen des 
gesamten Dokumentes entsteht. Für 
Broschüren ist es üblich, zwischen 
rechten und linken Seiten (Recto- und 
Veroseiten) zu unterscheiden. Auch 
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hierfür hält Finesse spezielle Funktio¬ 
nen bereit. 

Nach der Gestaltung eines Seitenlay¬ 
outs kann dieses separat abgespeichert 
werden und immer wieder für die Er¬ 
stellung einheitlicher Dokumente be¬ 
nutzt werden. 

In Finesse wird das Material (Bild + 
Text) nicht direkt auf die Seite plaziert; 
vielmehr verwendet man Rahmen, die 
man in einer Weise auf die Seiten 
“montiert“, die an die herkömmliche 
“Schere- und Kleister“-Technik erin¬ 
nert, wie sie vor der DTP-Revolution 
üblich war: Text- und Bildmaterial 
wurde niemals direkt auf die Seite 
montiert, sondern Artikel, Überschrif¬ 
ten und Illustrationen wurden separat 
auf Papier gedruckt und dann auf die 
passende Größe beschnitten. Mit Hilfe 
eines speziellen Klebstoffes wurden 
diese Teile dann so auf die Seite fixiert, 
daß sie leicht wieder gelöst und an an¬ 
derer Stelle plaziert werden konnten. 
Analog hierzu bildet auch die Seite in 
Finesse die Unterlage, auf welche die 
einzelnen Teile, meist Rahmen, mon¬ 
tiert werden. Ein Rahmen ist dann mit 
einem Stück Papier zu vergleichen, das 
einen Artikel oder eine Illustration ent¬ 
hält und das durch Ausschneiden und 
Einkleben beliebig manipuliert werden 
kann. Finesse kennt zwei Arten vom 
Rahmen: Textrahmen und Bildrahmen. 
Beide Arten können beliebig ausge¬ 
schnitten und eingeklebt werden, nicht 
nur innerhalb der gleichen Seite, son¬ 
dern auch von einer Seite auf die ande¬ 
re. Ein ganz großer Vorteil dieser elek¬ 
tronischen Rahmen im Vergleich zur 



Abb. 1: üb Portrait... 



konventionellen Methode besteht dar¬ 
in, daß nicht nur ihre Position sondern 
auch die Größe und Form verändert 
werden kann. Auf diese Weise kann 
beispielsweise ein Text, der ursprüng¬ 
lich in einem Block angeordnet war in 
zwei oder mehr Spalten verteilt wer¬ 
den. Dazu muß lediglich die Größe und 
Lage des Rahmens definiert werden, 
Finesse verteilt den Text dann automa¬ 
tisch. Wenn ein Bild nicht in einen vor¬ 
gegebenen Rahmen paßt, kann es belie¬ 
big gestreckt oder geschrumpft werden. 

Finesse ist flexibel 


Ein Bild kann beispielsweise mitten auf 
eine Textseite “geklebt“ werden, wor¬ 
auf das Programm den Text automa¬ 
tisch um das Bild herumfließen läßt, 
ohne daß sich der Anwender darum 
kümmern muß. Finesse stellt eine Viel¬ 
zahl der Funktionen herkömmlicher 
Textverarbeitungsprogramme zur Ver¬ 
fügung, und das natürlich in WYSI¬ 
WYG (What you sec is what you get). 
Es verfügt in Kombination mit der mit¬ 
gelieferten Bitstream-Fontware über 
eine erschöpfende Auswahl von Schrif¬ 
ten. Zunächst sind da die Schriftarten. 
Diese sind in eigenen Dateien auf einer 
Diskette untergebracht, und man iden¬ 
tifiziert sie anhand von Namen wie 
“Swiss“, “Dutch“ oder ähnlichen. 


Diese Schriftarten können jedoch nicht 
direkt benutzt werden; sie müssen viel¬ 
mehr mit Hilfe der Bitstream-Fontware 
in Fonts (Zeichensätze) umgeformt 
werden. Ein solcher Zeichensatz be¬ 
ruht auf der gewählten Schriftart und 
weist eine frei wählbare Punktgröße 
auf. Diese Umformung muß allerdings 
nur einmal durchgeführt werden, dann 
steht der entsprechende Zeichensatz 
zur Verfügung. Im Gegensatz zu ande¬ 
ren, selbst zu professionellen, teuren 
Systemen, erzeugt Finesse die ver¬ 
schiedenen Punktgrößen nicht durch 
eine grobe Multiplikation der Stan¬ 
dardgröße, sondern stellt für jede Grö¬ 
ße einen eigenen, selbständigen und 
wohlgeformten Zeichensatz bereit. Im 
Finesse-Programmpaket sind bereits 
einige Schriftarten inbegriffen, die so¬ 
fort in die gewünschten Zeichensätze 
und Größen umgesetzt werden können 
(angefangen von kleinsten Punktgra¬ 
den für Fußnoten bis zu riesigen Let¬ 
tern für auffallende Schlagzeilen). Zu¬ 
sätzlich können eine Vielzahl von Bit- 
stream-Schriften erworben werden, 
um sich ein wirklich professionelles 
Sortiment zusammenzustellen. Für den 
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Anfang reichen die mitgelieferten 
Schriften in jedem Falle. 

Text in Finesse 


Es gibt zwei Möglichkeiten, einem Fi¬ 
nesse-Dokument neuen Text hinzuzu¬ 
fügen, wobei jedoch der erste Schritt 
immer gleich bleibt: es muß ein Text¬ 
rahmen aufgezogen werden. Anschlie¬ 
ßend kann die Texteingabe direkt über 
die Tastatur erfolgen, oder man impor¬ 
tiert Text. Diese zweite Methode ist 
sehr praktisch, weil sie erlaubt, Mate¬ 
rial in Finesse hereinzuholen, das mit 
einem beliebigen Textverarbeitungs¬ 
programm erstellt wurde. Diese Me¬ 
thode hat verschiedene Vorteile: her¬ 
kömmliche Textverarbeitungspro¬ 
gramme sind wesentlich schneller als 
DTP-Programme, da hier die Forma¬ 
tierung des Layouts entfällt. Zudem 
bevorzugt jeder ein bestimmtes Pro¬ 
gramm, so können beispielsweise 
Wordstar-Nutzer bei ihren gewohnten 
Control-Befehlen bleiben und dennoch 
in den Genuß echten DTPs mit Hilfe 
von Finesse kommen. Der Tip für Pro¬ 
fis heißt also hier: Text erstellen mit 
der gewohnten Textverarbeitung und 
mit Finesse in Form und Layout brin¬ 
gen. Von Finesse werden dabei unmit¬ 
telbar folgende Textverarbeitungen un¬ 
terstützt: Wordstar, Ist Word, Gem- 
Write, Wordperfect, MS-Word und 
natürlich alle anderen, welche ASCII- 
Files erzeugen können. 

Bilder in Finesse 


Bilder, egal ob Fotos, Diagramme oder 
andere Grafiken, können leicht und 
mühelos in Finesse-Dokumente über¬ 
nommen werden. Genau wie beim Text 
wird auch hier ein Rahmen aufgezogen 
(hierbei allerdings ein Grafik-Rah¬ 
men). Daraufhin wird Finesse der 
Name der Datei mitgeteilt, welche das 
Bild enthält. Das Originalbild kann 
vergrößert, verkleinert (beides ist auch 
verzerrt möglich) oder nur ausschnitt¬ 
weise übernommen werden. Weitere 
Bild-Manipulationen sind in Finesse 
nicht möglich, diese müssen in dem 
Grafik-Programm vorgenommen wer¬ 
den, welches das Bildmaterial bereit¬ 
stellt. 

Eine weitere Besonderheit von Finesse 
ist die Unterstützung eines Scanners, 
mit dessen Hilfe Bilder bekanntlich di¬ 
rekt eingelesen werden können. Das 
Handbuch gibt hier ausführliche Hil¬ 
fen. Folgende Bildformate werden von 
Finesse unterstützt (eingelesen): 



Abb.2: ...oder Tabellen. Das Einbeziehen von 
Grafiken geschieht bei Finesse ohne Probleme 


— TIFF-Dateien, wie sie von einer 
großen Reihe von auf Bit-Image funk¬ 
tionierenden Malprogrammen für den 
Datenaustausch verwendet werden 
(.TIF) 

— GEM-Metafiles, wie sie unter dem 
Betriebssystem GEM erzeugt werden 
(Zeichnungsdateien mit der Endung 
.GEM) 

— Bitmap-Dateien wie sie ebenfalls 
unter GEM Vorkommen, allerdings 
von Pixel-orientierten Malprogram¬ 
men erzeugt werden (.IMG) und mit 
PC-Paintbrush (oder kompatiblen) 
Programmen erzeugte Dateien (.PCX 
oder .PCC) 

Pie Ausgabe 

Finesse erzeugt schon auf einfachsten 
Druckern erstaunliche Ergebnisse. Die 
meisten gängigen Drucker werden un¬ 
terstützt, mit Ausnahme der nicht gra¬ 
fikfähigen. Natürlich werden die be¬ 
sten Ergebnisse immer noch auf einem 
Laserdrucker erzielt, aber Finesse 
spricht wegen seines Preises zunächst 
einmal Besitzer kostengünstigerer 
Ausgabegeräte an. Das Ergebnis ist 
verblüffend, es wird wirklich das Beste 
aus jedem Drucker herausgeholt, 
wenngleich auch der Ausdruck auf 
9-Nadel-Druckern zeitintensiv ist, da 
die Zeilen mehrfach überfahren wer¬ 
den, um durch Versetzen und Überlap¬ 
pen der Matrixpunkte eine höhere Auf¬ 
lösung zu erzielen. Doch das Warten 



Abb.3: Eine bequeme Steuerung macht Finesse 
bes onders an wenderfreundlich 


lohnt in jedem Fall. Sehr angenehm ist 
die spielend einfache Installation der 
Druckertreiber. 

Wertung 

Um es gleich vorwegzunehmen: für 
diesen Preis gibt es zur Zeit kein ver¬ 
gleichbar gutes DTP-Programm. Trotz 
vielfältiger Möglichkeiten des Pro¬ 
grammes ist die erforderliche Einarbei¬ 
tungszeit minimal. Hierzu trägt nicht 
zuletzt das tadellose, in deutscher Spra¬ 
che verfaßte, Handbuch bei. 

Sowohl die Installation des Program¬ 
mes als auch die ersten Schritte in der 
Welt des DTPs sind nach wenigen Mi¬ 
nuten Lektüre zu bewerkstelligen. Be¬ 
sonders an Einsteiger richtet sich dann 
auch ein spezieller Lernteil im Hand¬ 
buch, der unabhängig vom verwende¬ 
ten DTP-Programm allgemeine Hin¬ 
weise zur Gestaltung eines Doku¬ 
ments, Wahl einer Schriftart, Blattauf¬ 
teilung und Layout im allgemeinen 
gibt. Für viele dürfte dieser Teil des 
Handbuches überhaupt der wichtigste 
sein, obwohl er nicht besonders auf Fi¬ 
nesse abzielt. Das beste DTP-Pro¬ 
gramm kann nämlich dem Anwender 
nicht die gestalterische Arbeit ab¬ 
nehmen. 

Hervorzuheben sind noch die wahlwei¬ 
se Maus- oder Cursor-Tasten-Bedie- 
nung des Programmes, wobei die Maus 
selbstverständlich vorzuziehen ist, 
aber es geht eben auch ohne. Finesse 
hat eine GEM-Bediener-Oberfläche 
und bietet die vollständigen Möglich¬ 
keiten eines echten DTP-Programmes. 
Finesse benötigt zwar eine Festplatte, 
gibt sich aber mit relativ wenig Platz 
hierauf zufrieden (in Abhängigkeit der 
Anzahl der verwendeten Schriftarten) 
und akzeptiert jede Grafikkarte, wobei 
die Bildqualität natürlich von der ver¬ 
wendeten Auflösung bestimmt wird. 
Die Formatierung längerer Textpassa¬ 
gen dauert etwas länger, dafür sind die 
hier enthaltene Silbentrennung, auto¬ 
matischer Spaltenumbruch, Bildum- 
fließungsmöglichkeiten usw. sehr gut, 
und das kostet eben Zeit (bei anderen 
DTP-Programmen übrigens auch). Die 
Schnittstellen zu verbreiteten Textve¬ 
rarbeitungsprogrammen runden das 
Bild positiv ab. 


Bezugsquelle: Fa. ACT GmbH. Kcmradinstraße II. 
6200 Wiesbaden-Erbenheim. 

Preis: ca. 426, — DM 


(Oliver Rosenbaum/jf) 
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Wissen Sie eigentlich, was Sie versäumt haben? 


Nicht nur, daß Ihnen eine geballte Fülle an 
Informationen fehlt, Sie haben gleichzeitig 
jeden Monat das Superprogramm für Ihren 
CPC, PCW oder PC verpaßt. Entgangen 
sind Ihnen höchstwahrscheinlich seit Ja¬ 
nuar 1988: 


POPCORN - das Super-Strategiespiel... 
(CPC) 

LOCOCON - schnelle Konvertierung von 
LocoScript- Texten... (PCW-Joyce) 

(Heft 1/88) 

DESKMAN - Komfortable Benutzerober¬ 
fläche für Diskettenoperationen... (CPC) 
SCREENY - Grafik-Module ohne GSX für 
Mallard- BASIC... (PCW-Joyce) 

(Heft 2/88) 

SCHREIBMASCHINENTRAINER - zum 

Erlernen der Zehnfinger-Schreibweise... 
(CPC) 

TINY - Ein Texteditor der Sonderklasse... 
(PCW-Joyce) 

(Heft 3/88) 

ROTORMANIA - Actionspiel mit Hub¬ 
schrauber... (CPC) 

DIN-A4-QUERHARDCOPY - nutzt das ge¬ 
samte Druckerpapier... (PCW-Joyce) 

(Heft 4/88) 

PICTURE-PRINTER - Super-Hardcopy- 
Programm... (CPC) 

3DZEICH - vektororientiertes Zeichenpro¬ 
gramm (PCW-JOYCE) 

(Heft 5/88) 


Eine Chance... 

...haben Sie noch, wenn Sie die Bestellkar¬ 
ten im Heft ausfüllen und das jeweilige Heft 
nachordern (außer 12/88, dieses ist ausver¬ 
kauft). 

Also, nehmen Sie die letzte Chance wahr, 
ehe die Gelegenheit verpaßt ist. 


Bitte benutzen Sie die Bestellkarte, 


Postfach 250 
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I—Kleinanzeigen 


Biete Software 


Astrologie mit Computer 
International geschätzte Astro¬ 
logenprogramme, professionelle 
Deutungsprogramme, Lernprogramme 
für Anfänger, Handschriftanalyse, 
Bio-Rhythmus, Astro-I-Ging. 

Info gegen DM 2,- in Marken. 
Astron,K.W.Bonert,Peter-Marqu.Str.4a 
2000 Hamburg 60 G 


Lehrerkollegen, Sie wollen den 
PC, CPC oder JOYCE im neuen 
Schuljahr nicht allein zum 
Schreiben benutzen ? 

Berechnen und verwalten Sie 
Noten bzw. Punkte mit komfort. 
Programm. Einfachste Menü- 
Bedienung ohne Programmier¬ 
kenntnisse. Ausf. INFO gegen 
1,70 DM Porto, Claus Bernhold, 
Rommelstr. 31, 8783 Hammelburg 


CPC-PD SPIELE + ANWENDERPRG. 
Liste 100 Pf bei: Peter Breuker, 
Rektenstr. 10,4930 Detmold 1 


FASZINIERENDE SPIELABENDE 

.FÜR JOYCE-BESITZER 

"WORTFIX" (GLÜCKSRAD SAT1 ALS 
COMPUTERSPIEL!) UND "TIPUWETT" 
-DAS SPIEL FÜR ZOCKER! 

PREIS: 30,- DM + NN OD. V. SCHECK 
-WERNERDAHEIM,PETERSBURGER7 
2351 WILLINGRADE, TEL. 04328/831 


BTX für Joyce und CPC 

BTX-Textdecoder für 97,- DM 

Dataphon s21-23d für 359,-DM 
HAYES-komp. Modem für 295, - DM 
286er-AT 512KB/20 MB/5 1/4 Zoll 
/Herkules/Monitor 2499,- DM 

DATATRON-Systeme Ralf EBERT 
Neanderstr. 19, 2800 Bremen 1 
Tel: 0 40/58 45 31, BTX: 0421531065 G 


Wirtschaftliche Programme 
für die Arztpraxis auf 
dem Schneider CPC, Joyce, PC 
Fa. EFFEKTA, Am Wiggert 9c 
4500 Osnabrück, 05 41 -44 2416 G 


Dias ordnen mit Computer 

CPC 464/664/6128, JOYCE und PC 
bis zu 100.000 Dias: Suchzeit 
1 Sekunde. Info gegen Rückporto 
bei: Dipl.-Ing. W. Grotkasten, 

Birnenweg 6, 7060 Schorndorf 
Tel. 071 81/42846 G 


BONZO'S SUPER MEDDLER 
NEU: NOCH UMFANGREICHERE 
VERSION 4.0: DAS VIELSEITIGSTE 
PROGRAMM FÜR BAND-DISK-KO- 
PIEN, auch für neueste SPEEDLOCK- 
und CASSY-geschützte Programme, 
headerlose Files und div. Turbolader. 
Mit über 1000 Lösungshinweisen 
(werden laufend ergänzt) auf 3''-Disk 
nur DM 65,- + Versandk. Infos 
gg.Freiumschlag von SOFTWARE¬ 
VERTRIEB MARTINA HIPPCHEN, 
POSTFACH 100966, 5000 Köln 1, 

TEL.: 0221-21 5302 (19-22 Uhr) G 


ACHTUNG!! ERWACHSENE 

10 Disk. 5 1/4 oder 3 1/2 mit delikaten 
Programmen f. IBM PC/Kompatible 
Nur DM 50,- VS/Bar. M. Karbach, 
Remscheiderstr. 18, 5650 Solingen G 


ENDLICHI PD-SOFTWARE NUR DM 1,- 

Für IBM/Kompat. Kat-Disk, gratis. 

M. Karbach, Remscheiderstr. 18 
5650 Solingen 1 G 


GKONNEX DBase-Menü f. JOYCE 
faßt Ihre dBase-Programme in 
einem System zusammen. Einfach 
und sehr komfortabel! 44,- DM 
G. Kerinnis, Böcklerweg 30 
8000 München 82 G 


CPC & JOYCE PUBLIC DOMAIN 

Ein Info ist für 2 x 100 Pf erhältlich 
PDI, Pf 11 18, D-6464 Linsengericht G 


PD-SERVICE-LAGE bietet Ihnen: 
Public-Domain & Shareware z.B.: 
über 560 I DEUTSCHE PROGRAMME! 
über 250 ! Disk PD-SPIELE und 
neuste INTERNAT. Programme!!! 
Kopierkosten: 4,50-2,70 DM !! 
Alleinvertrieb PC-TEXT 2.0 & 
PC-ADRESS 3.0 v. ROLAND OTTER! 
Kat. f. IBM/kompat. g. 1,80 Porto 
PD-SERVICE-LAGE: Bernd Schulz, 
Hasselstr. 38, 4937 Lage/Lippe 
Auch alles auf 3,5" lieferbar! 

NEU bei uns: Low-Cost-Software! G 


VERKAUFE MEINE ORIG. CPC-SOFT 
AB 5,-DM, TEL. 0231/21 0316 


Joyce-Depotverwaltung, PCW 8512 
Trend, Blockdiagramm, Bilanz, Index 
Statistik, 24 Programme, DM 99,- 
Joyce-Skatschreiber, PCW 8256, 
große Spielstandanzeige, Ergebnis- 
u. Listenausdruck, Bockanz., DM 39,- 
Joyce-Gewichtskontrolle, PCW 8256 
Diagramm, Essenskontroll-Fragen, 
Listenausdruck, DM 35,-, V-Scheck 
Info DM 1,-, Horst Riehle, 

Am Karlsberg 13, 7180 Crailsheim 


...MUSIKARCHIV...VERWALTEN VON 
KASS., PLATTEN...BIORHYTH¬ 
MUS...SÄMTL. CPC'S. INFO 2 DM 
BFMK. KASS DM 30, DISK DM 40 
SCHECK, STIEGLER, SCHULSTR. 4, 
7056 WEINSTADT 


Lohn- und Einkommensteuer 1989 

Druckerausgabe + Datensicherung. 
Ausführliche Anleitung. Info 1,50 DM 
3"-Disk für CPC 79,- DM + VP. Versand 
gegen Vorkasse oder NN. 90er-Aktuali- 
sierung 20,- DM. S. Teurich, Mestern- 
straße 6, 4952 Porta Westfalica 3 G 


Biete Hardware 


CPC 6128 Grün + z. Laufwerk, 
Org. Software: DBASE, Wordstar, 
Assembler, Turbo Pascal, Spiele 
+ umfangreiche Literatur 
VB 950,-, Tel. 02331/67709 


CPC464 + CT M 644 + DDI-1 + SP 512 + 
5,25" Vortex + 100 Discs + Lit. 

VB 1100,-. S. Boiler, T. 0271/54459 


CPC6128/Grün + Fachzeitschriften 
Schneider Internat. 86-89 + Softw. 
dBASE, Turbo Pascal, Wordstar, Multi¬ 
plan usw. VB 1200 DM, 

TEL. 021 01/6041 59 


Gebrauchtcomputer mit Garantie 
AMSTRAD - SCHNEIDER - PEACOCK 
* CPC * JOYCE * PC * XT * AT * 
HARDWARE-SOFTWARE-LITERATUR 
Ersatzteile & Reperaturdienst 
ALLES zu echten Superpreisen. 
Ständiger Ankauf 
Höchstpreise für Ihren "ALTEN" 
bei Computer-NEUKAUF!!! 

Katalog anford. (2,- DM in Marken) 
EDV-CLOOTS, 5132 Übach-Palenberg 
Zeisstr. 7, Tel.: 02451/46608 G 


Der Computer zum Einstieg 
CPC 664/GT 64, schnell durch 
Disk., mit 16 Disketten und viel 
Software, 700 DM, Tel.: 09831/2931 


PCW 8512,ser/par. Interface 
dBasell, Lit. 30 Disk. Prog. 

VB 1250 DM, Tel. 091 54/8704 


Geprüfte Gebrauchtgeräte mit 
Garantie, neue und gebr. Schneider 
und Amstrad PCs, Floppy/Festplatten/ 
PC-MM und Farbmonitor, neue und 
gebr. CPC/Floppy/Drucker, Ankauf bei 
Systemwechsel, Reparaturservice, 
Manfred Kobusch, Bergenkamp 8, 
4750 Unna, 02303/1 3345 G 


CPC SPRACH-Synthesizer (oh. IC) 99,- 
(spricht eingetipptes, mit Lautsprecher) 
Modulator, color 89,-, (mit Videoaus¬ 
gang 119,-)/Thermometermodul (2 
Fühler max.) 59,-/Geräuschaufzeichner- 
modul + Micro, malt Zeitverlauf, 69, - 
/CNC, Stellinger Weg 43, 2 Hamburg 
20/Mit Gehäuse & Progr./Per NN 
sof./Prosp. geg. Rückporto G 


CPC 6128 color + 63 Disks + Mag. + 
Bücher, VB 1300,-, Tel. 02233/75434 


JOYCE 512KB RAM EXT 2 LW 5,25" 
Tel. 0561/774621, VB 950 DM 
DTP STOPPRESS DM 100 


Lichtgriffel nur DM 49,- 

Versand gegen Scheck/Nachnahme 
Info gratis! Computer angeben! 
Anschluß an jeden (!) Computer 
möglich. Standardversion für 
Amstrad lieferbar. Firma Klaus 
Schißlbauer, Postfach 1171R 
8458 Sulzbach, Tel.: 09661/6592 
oder 0941/999915 bis 21 Uhr G 


Test gelesen (Heft 8/89)? 
JOYCE-SCHALTINTERFACE: 
Ausführliches Info gratis. 
JOYCE-TASTATURVERLÄNGERUNG 
(Spiralkabel) nur 25,- DM 
(V-Scheck). E. Sinkwitz, Didakt. 

Hard- u. Software, Zähringerstr. 7 
7880 Bad Säckingen G 


PC 1512SD 640KB evtl. m. FPI 40MB 
u. Softw. VB 1900,-, T. 0911-7611 29 


ZU VERKAUFEN - ORG. Schn. Schnitt¬ 
st. RS232 für 85,- DM; "SCHNEIDER 
WARE" Basisplatine + Centronic- 
schnittst. + V/24 Schnittst. + Netz- 
teilpl. komp. im 19" Alugehäuse. 

Komp, für 190,-, Tel. 041 93-7 97 48 


CPC464 FARBE +■ DD1 + F1-X + 
SP512 + DMP2000 + 15MB PRO¬ 
GRAMME ZU VERK., VB 2200 DM, 
INFO: 022 27/34 88 ab 15h 


Suche Software 


SUCHE FÜR CPC 464 VOKABELTRAI¬ 
NER UND SPIELE AUF 5.25" DIS¬ 
KETTE, 02271/61424 


Suche 

Turbo-Pascal 5.0 für Schneider 
CPC 6128. Angebote an: Ralph Gorth, 
Berglenstr. 5,7000 Stuttgart 1 


Verschiedenes 


BTX-Modul f. JOYCE ab 598,50 ! 

ASSI DBASE II Benutzer- 79,- 

oberfläche Test PCI 9/89! 

NEU: EDY WS-komp, Editor 49,- 

NEU: TOPDAT 2.9 Adreßvw. 79,- 

jetzt Fullscreen Editor! 

NEU JOYCE ZWEITLAUFWERKE 333,- 
Gratisinfo! m&t Softw.lieferb. 
acw-Soft, Tel. 0228/636818, 

Breite Str. 16, 5300 Bonn 1 


upLink bringt Daten u. Progr. 
vom CPC u. JOYCE (m. CPS 8256) 
direkt zum PC/XT/AT. Transfer 
über die parallelen Schnitt¬ 
stellen. Komplett 168 DM - NN. 

Info. / Bestellung: CONCEPTION 
GmbH, Hubertusweg 14, 2000 
Hamburg 61, Telefon: 0 40/5845 03 G 


konvert. CP/M nach MS-DOS, CPC + 
JOYCE, Texte + Dat. mit IBM-Uml. 
INFO: J. Debus, Gärtnerweg 25 B 
6382 Friedrichsdorf, Tel. 061 75/544 G 


Disketten-, Datenkonvertierung 
JOYCE, CPC auf MS-DOS, ATARI 
Bernd Drost, Schulstr. 67 
6382 Friedrichsdorf, T. 0 61 75/6 04 G 


Wer kann Locoscript - Diskette V.2.16 
retten? (Fehler: Inhaltsverzeichnis fehlt)? 
Jungjohann, 0511-7790 44 


AMSTRAD PC 1512/1640 USER-CLUB 
bietet mtl. Zeitschrift, Software, 

Hilfe und mehr für alle. 

Inf. gg. Rückp. von Rolf Knorre, 

Postf. 20 01 02, 5600 Wuppertal 2 


Suche Erfahrungsaustausch mit 
Joyce-Usern, i.b. i.S. Konvert, 
von Loco-Texten auf AT; Klaus- 
P. Radkowski, Pf. 200911 465 Ge. 


Verk. CPC-Soft v. DMV u. PR8-Soft 
Suche Sam. Fox Strip Poker. 

Tel. 081 51/51713 Magnus verl. 


Club 


USER-CLUB 

FÜR JOYCE-ANWENDER! 

Info gegen Rückporto von: 
JOYCE-USERCLUB c/o Je. Berghof, 
Roseggerstr.5, 5600 Wuppertal 2 


PC-CLUB NORD, INFOS, 
MONATSDISK, INFO: KAROLCZAK, 
2061 STUBBEN 
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Ihr Computer-Partner für 
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S/W /. Super-Animation, Spielwitz der ersten Klasse, Taktik und wunderschöne Gra¬ 
fik finden Sie im neuesten CPC-Spiel zum Abtippen 



CPC-PROGRAMME: 

Für die CPC-Spiele-Freaks haben wir in der 
nächsten Ausgabe wieder einen Leckerbis¬ 
sen der besonderen Art. Hier gilt es nicht 
nur, den Joystick im richtigen Moment zu 
drücken, sondern auch Taktik und Schnel¬ 
ligkeit müssen unter Beweis gestellt wer¬ 
den, was freilich nicht so leicht ist, wie es 
auf den ersten Blick erscheint. 

Haben Sie sich gerade einen CPC gekauft? 
Ja, dann brauchen Sie sicherlich eine Da¬ 
tenbank, die möglichst für alle Archivie¬ 
rungsgegenstände geeignet ist. Wo Sie die 
bekommen können? 



Bild 3: Das Anwendungsprogramm des Monats: eine 
hauptspeicherorientierte Datenbank mit allem erdenk 
liehen Komfort und für jegliche Anwendung 

Keine Frage! Natürlich in der PC Amstrad 
International. Und das fast umsonst. 

BERICHT: 


Umsteiger und Aufsteiger. Ein Bericht über 
die Probleme und Schwierigkeiten der 
Computer-Wechsler. Wenn Sie mit dem 
Gedanken spielen, umzusteigen, dann soll¬ 


ten Sie sich den Bericht nicht entgehen las¬ 
sen. Viele Problem-Aspekte werden an- 
und ausgeleuchtet. 

TIPS & TRICKS: 

Viele bunte Farben auf dem Bildschirm - 
wer hätte das nicht gerne. Und wer in der 
80-Zeichen-Auflösung gearbeitet oder ge¬ 
spielt hat, weiß, welch triste Angelegenheit 
das ist. 

Aber durch eine trickreiche Programmie¬ 
rung können Sie eine Farbenvielfalt in 
MODE 2 erreichen, die wirklich erstaunlich 
ist. 

Erstaunlich sind auch die Möglichkeiten, die 
mit unseren Mini-Programmen erreicht 
werden können. Als Beispiel wären da eine 
schnelle Laufschrift, in die Sie so viel Text 
hineinpacken können, wie Sie möchten. 
Oder ein Ratespiel, wo es darauf ankommt, 
schnell zu sein. 

Diese zwei Beispiele sind nur eine kleine 
Auswahl aus den Highlights, die Sie im 
nächsten Heft erwarten! 

HARDWARE: 

Wer sich ein Zweitlaufwerk kaufen möchte 
und handwerkliches Geschick besitzt, sollte 
sich unseren Artikel über ein preiswertes 
selbstgebautes Diskettenlaufwerk nicht 
entgehen lassen. 

PC: 


Daß Public-Domain-Software nicht mit 
Hobby-Programmen gleichzusetzen ist, zei¬ 
gen wir Ihnen bei einem kleinen Abstecher 
in die Welt der freien Software. Lassen Sie 
sich überraschen! 


Wer von einer Batch-Datei verlangt, sie 
möge Parameter während der Abarbeitung 
vom Benutzer abfragen, der stößt schnell 
an die Grenzen der Möglichkeiten, die die 
Stapelverarbeitung zur Verfügung stellt. 
Doch gibt es auch hier einen Weg, der die¬ 
ses Problem zu lösen vermag. Wie, das zei¬ 
gen wir Ihnen im nächsten Heft. 



Bild 2: Wni VGA-Grafiken auf seinem VGA-Computei 
nutzen möchte, sollte sich die Review von VGA-Paint 
durchlesen 

Mit VGA-Paint erschien ein weiteres Grafik¬ 
programm, das, wie der Name schon sagt, 
die VGA-Karten unterstützt. Was es leistet 
und welche Ergebnisse mit diesem Pro¬ 
gramm erzielt werden können, lesen Sie in 
unserem Testbericht. 

PCW: 


Steigen Sie mit ein, wenn es darum geht, 
eine Adreßverwaltung unter dBase zu pro¬ 
grammieren. Wichtige Tips und Tricks kön¬ 
nen Sie dem neuen dreiteiligen Artikel und 
dem Programm entnehmen. 

Ein dBase-Patch verhindert übermäßig lan¬ 
ge Fehlermeldungen. 

Weitere Tips erwarten Sie! 


Amstrad.104 

CG-Com puterstore.43 

CSV Riegert.41 

Diabolo Versand.55 

DMV.2,27,31,33,51,59,61 

.66,67,71,81,95,97,99,103 

Dobbertin Elektronik.11 


DIE INSERENTEN 


G + L electronic.43 

Kosmalla + Partner.11 

Kotulla.13 

Krebs Ing.-Büro.41 

Legenda Informationssysteme.79 

Schuster Electronic.23 

SD Computer.25 


Strauß Elektronik.47 

Weber.25 

Weeske.19 

Werder.75 

Wiedmann.75 

van der Zalm.25 
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Wissen ist Macht. 

Neu im DMV-Verlag: Computer-Wissen. Ein Magazin, 
das Ihnen Wissen über Ihren PC vermittelt, das andere nicht haben. 

Unsere Themen: Alles, was Ihnen hilft, den PC besser zu nutzen und zu 
verstehen. Mit DMV-Computer-Wissen steht Ihnen das gesamte Know-how der 
DMV-Redaktionen in leichtverständlicher Form zur Verfügung. 


Aus dem Inhalt: 

Programme: 

- Deutsche Fehlermeldungen in 
GW-BASIC 

- Datei- und Verzeichniswahl mit 
Cursortasten 

- BASIC-Programme automatisch 
strukturieren 

- Konvertierungsprogramm 
von GW nach Turbo 

Routinen: 

- Umfangreiche Berechnungs¬ 
funktionen 

- Konfiguration feststellen 

- Hardcopy programmgesteuert 

- Grafikroutinen 

- Mausroutinen mit Testprogramm 

Specials: 

- Kalenderberechnungen 

- Wahrscheinlichkeit und Statistik 

- Literaturverzeichnis zum 
Thema BASIC 

Und vieles anderes mehr: 

Insgesamt über 500 Funktionen! 

Damit Sie das Rad nicht ständig neu er¬ 
finden müssen, steht Ihnen im ersten 
Band von DMV-Computer-Wissen eine 
in Umfang und Vielfalt unvergleichli¬ 
che Routinensammlung für Ihre eige¬ 
nen Programme in GW-, Turbo- und 
Quick BASIC zur Verfügung. Alle Li- 
stings und Programme sind auch auf 
Diskette erhältlich. 



AB SOFORT IM HANDEL 


DMV-Computer-Wissen Band 1 : Basic-Toolbox 18 , - 

DMV-Computer-Wissen IDATABOX (2 stck. 5 1/4“ und 1 stck. 31/2“) je 35 , - 

* Unabhängig von der Anzahl der bestellten Artikel berechnen wir für das Inland 4, - DM 
bzw. für das Ausland 6, - DM Porto und Verpackung. Bitte benutzen Sie die Bestellkarte. 
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AMSTRAD PC 1640 


Die AMSTRAD Grafik-Profis 


Standard MS-DOS-PC mit 
640 KB Arbeitsspeicher und 
schnellem 8086-Prozessor 
mit 8 MHz. 5 1/4" Disketten¬ 
laufwerk und 30 MB Hard¬ 
disk optional. Eingebauter 
Grafikadapter mit 4 verschie¬ 
denen Modi: monochrom 


(IBM-Standard-Grafik), Her¬ 
cules (720x348 Punkte), 
CGA- und EGA-Farb-Grafik. 
Tastatur mit abgesetztem 
lOer-Block und Funktions¬ 
tasten. Wahlweise ergonomi¬ 
scher schwarz/weiß-Monitor 
oder EGA-Farbmonitor. 


Seit 1. November 
24 Monate Garantie 
auf alle 

MS-DOS-Rechner 


Seit 1. November 
24 Monate Garantie 
auf alle 

MS-DOS-Rechner 


Alle Preise sind unverbindliche Preisempfehlungen 


IBM PS/2 Modell 30 kom¬ 
patibler PC mit echten 16-Bit, 

8086- Prozessor und 8 MHz. 

8087- Coprozessor optional. 
640 KB RAM. 3,5"-Laufwerk 

720 KB. Optional 30 MB 
Harddisk mit Interleave-Fak- 
tor 1:1. VGA-Grafik, EGA-, 
CGA- und Hercules-kompati- 
bel. 4 verschiedene VGA- 
Monitore nach Wahl. Win¬ 
dows 2.03, Maus und GW 
BASIC. 3x8 Bit Erweiterungs¬ 
plätze von außen zugänglich. 


Superschnelle 

VGA-Grafik 

Die aktuellste Grafik-Techno¬ 
logie als Büro-Standard. 
640x480 Punkte Auflösung. 

Amstrad 
VGA -Monitore 

/\ Farbmonitor mit 
* 262.144 darstellbaren 
Farben. Monochrom-Monitor 
mit 64 Graustufen. Hervorra¬ 
gender dot-pitch (Farb- 
punktabstand) ab 0,28 mm. 
Hohe Bildwiederholfrequenz 
von 70 Hz. PC12MD 12" 
Monochrom-, PC14CD 14" 
Color-, PC12HRCD 12" Color 


PC 2086 S, D oder HD 30 mit 12" MD, 

14"CD, 12" HRCD oder 14" HRCD-Monitor: 


Anulrad PC 2086 

1 LW 

2 LW 

30 MB HD 

VGA Monitor 




PC 12 MD 

2.295.- 

2.795,- 

3.295,- 

PC 14 CD 

2.695.- 

5.195,- 

3 695,- 

PC 12 HRCD 

3.095,- 

3.595,- 

4095- 

PC 14 HRCD 

3.495,- 

3.995,- 

4 495,- 

Alle Preise sind unverbindliche Preiscmpfehlungen 


Peripherie 

Amstrad - einer der größten 
PC-Hersteller der Welt - 
liefert professionelle PCs im 
modernen Design unter 
MS-DOS, OS/2 und UNIX, 
VGA-Monitore, Drucker 
und LAN-Netzwerke für i 
bis zu 64 Arbeitsplätze. A 


AMSTRAD PC2086 


High-Resolution- und 
PC14HRCD14" Color High- 
Resolution-Monitor. 

Adapter 

Spezieller Adapter zum 
direkten Anschluß eines 
externen 5 1/4"- oder 3 1/2"- 
Laufwerks oder Streamer. 


b A 

'2"-Ä 

A 


PC 1640 EGA SD. DD oder HD 30 
PC 1640 Mono Here. SD. DD oder HD 30: 


PC 1640 

1 LW 2 LW 30 MB HD 

Monochrom- 

Bildschirm 

1.799, 1.999.- 2.599,- 

EGA 

Farbmonitor 

2 699,- 2.999.- 3.599,- 


f Wo? 

Beim AMSTRAD-Fachhandel 
selbstverständlich. 


AMSTRAD GmbH 
Dreieichstraße 8 ■ 6082 Mörfelden 
Tel. 06105/2003-0 






















































